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t5-500 and RSTS-11 Version 4 are obsclete products and 


have been removed from the DEC Standard Price List. No 


orders will be accepted for this software by the Corpora~ 


tion. The recently announced DATASYSTEM £35 provides 4 devs 


“TS-500/E (RSTS/E) system on al 11/40 with J6K oytes, LASS 
sonsole, an? e o RKO5 disks at a packaced crice that wil? 
meet the neecs of the market for sa low cost. e@ntry-i 


system. 
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vrso/vTo0s Info 
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HARDWARE 


ODT 
BASIC - PLUS FILE PROCESSING 


TABLES 


Job Statistics Buffer Conditionally Assembled 


At Location 234, (156.) is'a three-word table of pointers 


8 
DSTATB Disk statistics huffer 
JSTATB Job statistics bufter 
OSTATB Queue statistics buffer 


At each clock tick, the system checks the switch register. 
for the proper action: | 
Contents | 
PETIT? Collect statistics 
LxxXXXX Freeze statistics 


Oxxxxx Clear Staticries 


The job statistics area contains the following entrics: 
Entry size Usage 


word Number of ticks per second 
Uptime | 
Shallést number of free small buffers 
Level 5 accounted 
Lost time 
Level 3 unaccounted 
Null job time 
Fip needed 


1 
2 
1 
2 
2 
2 
2 
2 
2 In system mode 
2 Fip waiting 
2 for code 
2 for disk information 
2 for disk storeye aljocation 
2 for something cise 
12 One two-word entry for each provcesser priv: 
a, Number of lockouts 
1 


wamber ct KWIlIP clock cverruns 


Int 


UNTCNT: _ UNTCLU: _SATSIZ: SATCTL+SATCTM SAL TL: SATE an: 
“Pack status ; fError Count & [Maximum vaste [F f j [First sector#: Current “Togica 3 
of SAT ptr sectors on parecer cea oy | SAT ptr-FUN? | 


| &" OPEN" Pac: Cluster- 
| Count for size for FUN@ | for FUND FUNG SAT-FUD3/ 


OFUNTT: P 


ok Aaa ae natn HE CET 


OKUNIT:| Pack status | Error Count& 
| &"OPEN"count |Pack Cluster- 
| for FUNI size for FUN 


ORAL IGN SN ga a NM 


First sector 
#referenced 
by SAT-FUN1 


F Current logical 
| SAT ptr-FUNI1 
! 


Maximum value | # of free 
of SAT ptr sectors on 
for FUN1 FUNL 


| Pack status | _|Error count&! | Maximum value | # of free “Pivst sector| {| turre 
; &"OPEN"count' [pack cluster+ of SAT ptr | | sectors on #re“*erenced | logical SAT 
for FUN2 Size for FUN2 | for FUN2 by SAT-FUN2 | ptr-FUN2 
| tc. Etc. 
ore ae 
xf Etc Etc. 


| “Pack status jError taster} First sector 


#+referenced 
by SAT-FUN 


Max imum value +# of free 
of SAT ptr sectors on 
for FUN 


Current logical 


ce & |Pack Cluster SAT Bere 


| for FUN 


size for FUN 


Etc. Ete. Etc. a Etc. 
: Etc. | 3 apg __Etes ___Ete? 
| Pack Status Error Counts Maximum value “# of free First sector] |Current 
| &" OPEN" count Pack Cluster~ | of SAT ptr sectors on #referenced | logical SAT 
7 for FUN size for FUN } for FUN, _ FUN by SAT-FUN,_j | ptr-FUN,_) 
. : [Error Counts Maximum value | # of” free First sector Current 
& "OPEN" count |Pack Cluster- | of SAT ptr sectors on #referenced logical SAT 


for FUN, size for FUN|, FUN 


for le n 


by SAT-FUN, pei 


re ee NE 
High Byte: (When SAT ptr Legieel SAT 
disk error reaches its ptrs begin 
count maximum value, at and 
Low Byte: it is reset are altered 
Pack Cluster- to zero.) dynamically. 
Size 


Tne proper entry in these tables is indexed by 2*FUN. 


SERTBL: SIZTBL: 


FILSER 


TTYSER 


DTASER | 


| LPTSER 


1 PTRSER 


MTADEV (in 
DEVTBE Tbl) 


XXXDEV> 


2 byte Maximum unit Pointers to addresses of 
ASCII # for each slots in service rou- 
names device (if UNTCNT or tines used by 
of all entry is -l, . DEVTBL appro- USERIO for 
devices then that priate to read/write 


device does each device requests 
not exist.) 


CORTBL: 


for first 1K words of cora 


for 2nd 1K words of core 


for 3rd 1K words of core 


for 4th 1K words of core 


+ eammeneine ee 
se 
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—s- faw os 
ee eS 
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| | 
oe eee 


ag ve 
ae 
4 ae 
oe ie 
—_ 
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| 
| 
| 


ate 


aE 
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Le 
—+ 
i eer | 


aE | 
rm aff 44 fe — 
SHY | 
woe 
Ho | 


i a ed 
idle 
Sod a 
| 
a 
| 


i ma 


for nth 1K words of core 


end of CORTBL indicator 


LCK = This entry to ke locked in core 

SWP = This entry to he swapped z= soon as possible 
IN = Swap direction = IN 

OUT = Swap direction = QUT 


LEVEL 3 QUEUE TABLE 


MODULE 


entries are defined with the macro "L3QENT" 


FIPRET-file processor return | 


SWPRET-swap completions 


FILRET-I/O completed 


DTSYM-reads or writes a block of DECtape for FIP 
BUFQ-big buffer pool starter | 
BUFSMQ-small buffer pool starter 


DTQCON-dispatches to appropriate driver completion 
address, unqueues next driver request 


DTWCON-return after block allocate 


CDRL3Q-card reader service 


MTACON-process a req est 


MTADNE-process finished request 


BRINGO-bring a job into core 


SCHED~scheduler 


force a job to dump himself 


TIMERS-once a second timer service 


L3QTBL: 
+0 

+2 

+4 

+6 

+10 
+12 
+14 


+16 


+20 
+22 
+24 
+26 
+30 
+32 
+34 


+36 


EMTS (added to 104 96068) 


Identifier Value EMTTBL: 


CALFIP 


. READ 


§ ——___—_——_—__———» # |FIPEMT FIP entry point for user 


USERIO: I/0 interface for direct 
USERIO access READ/WRITE | 


6 —————_——————» 6 | CORE. Expand/shrink the job 


enema 


1g ————_—__»18 |SLEEP. Sleep job for n seconds 


i 
12—_______——_-»12 |PEEK. Peek at an address for user | 


Special functions 


TTAPE. Enable tape mode 


2 86 ——__-_—_—__——_—_»?2f1 |TTECH. Enable echo/disable tape 
mode 


24 ———_—_——_—_—_—————» 24 |TTDDT. Enable DDT submode 
26 ————_—__-—_———-» 726 /TTRST. Restore programmed output 


36 —_________5 34 |TIME. Give job timing info. 


8 Denny 32 | POSTN. Get current position on line ! 


5] 
1 


|'DATE. Get date infor. for job 


PRIOR. Set/clear special run 
priority 


4 § ——_—__—__—___» 44 |STAT. Get jobs current statistics 


4? ——________ sh? |RUN. Run job (via channel #15) 


yy ——______ ys HY | NAME. Put names of job in NAMTBL 
4-46 | EXIT. Return to defauit RTS 


| nn annnere T jase Change RTS to named RTS | 
5 2 wo i 5 2 t ERLOG . | 
{ 


Log the error called 


Sy 54 | LOGS. Check for logical errors 


FIPTBL - ADDR TO ROUTINES 


Possible values for FQFUN (high order bute of word 2 in FIRQB) 


+0 CLOSE - close an open channel OPN 
+2 OPEN - open a channel OPN 
+4 CREATE - create/extend/open a channel ORN- 
+6 DELNAM - delete a file by name DLN 
+10 RENAME - rename a file OPN 
+12 DIRECT - directory information DIR 
+14 UUOF = process UU0O> | UU0- 
+16 ERRFIL - get error message text OPN 
+20 RESET - reset (close) all channels except 2# OPN 
+22 LOOKUP - file lookup OPN 
+24 ASSIGN - assign a device ZER 
+26 DEAS#4 - deassign a device ABS 
+30 DEALL - deassign all devices OPN 
#32 CRTMP - create a .TMP file OPN 
+34 CRE8B# - create an image file OPN 
% dance 
+36 WINDOW - window turner for disk files WIN 
+40 EXTCRE ~ extend a closed disk file | EXT 
+42 OPENCR = open a newly created/extended file OPN 
+44 LOGIN - login a user. LIN 
+6 PASSWD - create user account ZER 
+50 DLUF - delete user account DLN 
$52 RADF - read or read/reset accounting data DIR 
+54 CHUF - change password/kill job DLN 
+56 CLEAN - clean up a disk pack DLN 
+60 ZUSF = zero things DLN 
+62 ATTF - attach to a detached job LIN 
+64 DETF - detach from a terminal DIR 
+66 MOUNT - mount/dismount/lock/unlock disks OVRUTL 
+70 MTAOPN - magtape opener MTU 
+72 MTACLS - magtape closer MTU 
+74 MTAUTL - magtape utility MTU 
+76 DTALOC - dectape allocator DTU 
+100 DTSERR - dectape error processor ‘* DTU 
+102 DTLIST - dectape directory information DTU 
+104 DTKILL - dectape file deleter DTU 
+106. RUNJOB - run some program for a user OPN 
+110 DTNAME - dectape renamer DTU 
+112 DTRF - dectape directory reader DTU 
+114 DETCLOS - dectape closer DTU 
+116 DTOPEN - dectape opener DTU 
+120 DTZERO - dectape zeroer DTU 
+1272 BACKUP - change file date/time for backup UUO 
+124 HANGUP - hangup a dataset UUO 


* Functions above this line are the only functions the run- 
time system may issue. 


oe cae, 


+126 FILES - file statistics | 

+130 4 CREAT2 - 2nd part of file creator | 

+32! DTCNTG - dectape contig. file creator | 

#134: PRIORT - set priority, etc, for job | 

#136. ., 

+140 | OPENDV - open devices in general | 

+142 YESLOG - enable further logins 

+144 TERMIN - set terminal characteristics 

+146 MTAZER - magtape zero function 

+150 MTALST - magtape catalog tunction 

+152 EXTEND - extend an open disk file | 

*154 LOGOUT - logout a user 
{ 
| 


Module names containing various functions are includec 


the right. 


BLOCKS 


DIGITAL EQUIPMENT CORPORATION 


JDIOB - pointer to IOB 


JDFLG - 


ob status flags 


D Post - post to RTS 
pointer to job work block 
JDRTS - pointer to RTS block 

JDRESB =~ L3QUE bits to set on residenc 


JDWORK - 


JDUFDR - RIB entry of UFD for user _ 


JDKCTM - 


' MSB of KCT used . 


JDSIZ$ - - Size now 


DCPU - CPU in lengths of sec 


JOB DATA BLOCK 


IJDIOST -IO status 


JDCON =~ Connect time in min 
JDKCT - KCT used 


IDPPN - 
JDCORM —- 
‘JDBRST -_ 


JDDEV - - Device ‘time_ in min 


obs PPN 


apna ae an in mao 


jobs core max_ 


jobs burst 


Bits In JDSiWiaP | 
Bit in Bit Map Word 
Selects 1 of 4 map words 


G-3 
5-4 
7-6 


Selects Map Word 


__JDPRI - jobs priority _ 
~ JDSWAP - jobs swap param 


Per aad 


RUN-TIME SYSTEM DESCRIPTION BLOCK 


R. LINK 


R. NAME 


R.CNT 

R.USIZ2 
R.MSIZ 
R.DISK 


nm TAAT 
ine iJIWOMY 


R.BACK 
R.BYTE 
R.XMEM 
R.ISIZ 
R.~RDSK 


R.CPTR 
R.1LKCT 


_ R.REDO 


Hiorder real memory address 


Link to More Descriptions 


2 wd Rad 50 name of pure code 


Count of active users 
Max size in K for user aie 
Min size in K for user 

CILUS Disk Block # 
Low oraEer Lea 4 MSL agai 


Pointer to NB 208 RES. 
Byte Count of “Image _ | 


EE RST) 


; 
(i 
w 
wi 


Initiai size ink for u user 


Double word dg RSTS | Dis isk. 
Address 
PTR to last core cable entry +2 4 


Size of Na ind x j 


a5 sce NOL eR ae ae ed 


SRC (SE TURE RA a NR 4 


Nips gri tags 


Full 4K Cesceiptoou pattern 


ara 


NO SD) RD Fb 


NO 
SOON & Me aE 


* 
oe ON, 


tad iy tad LO BD AG 
aN 


FQQQ Queue in link set by FIP | | 


a 
y 

FQJOB Issuing Job #X2 2 
FQFUN Function requested 3 
FOQFIL Channel Slot in IOB of issuing job 4 
FOERNO Error message code and text start 
FQPPN Project/programmer no. | 6 
FOCOM3 Internal data 

2 word file name 1g 

in RADIX50 
FQEXT Extension in RADIX50 14 
FQSIZ No sectors in file or sectors to extend 16 
FOCOM2 Internal réturn addr (DECtape) 

3 word new file name EXT in RADIX50 20 

Open for output switch 

Default buffer length 
FQMODE Mode Indicator 22 
FOQFLAG File's flag 24 
FQCOM1 Internal Return (DECtape) 26 
FQPROT New protection code (-1 if passed) 27 


FQDEV . 2 byte ASCII device name | 30 
FQDEVN 1 byte unit number | 32 


FQCLUS File cluster size for file creation 34 

FOCOM DDB link addr (DECtape) 

FQOFUN1L Chaining function FQNENT no of directory 36 
entries 

FOQFUN2 Internal extra function 37 


File request queue block (FIRQB) (pronounced "Furk-be") 


All requests for file processing are made by setting the neces- 


sary parameters in the FIRQB, and calling the Monitor with 
"CALFIP". 


Only relevant parameters need be supplied. When FIP exits, the 
returned values come back in the FIRQB along with an error code. 


FIRQB entries include'‘the following: 


Multiple entries are for differant FIP functions 


File Keguest Qveve: Tock FIROR Used by FIP 


Symbol Orfsot. Usaqe 


ad NE Se eS ee 


“OOO 0 Queue word, set by file processor 


x) 
C4 
pm 
bell 
N 


byte Ze-jop peuber of request issuer 


o 
rey 
et 
A 
[ee] 


byte internal function number 


4 


2-channel numer 


FOPPN Projcet/progranmer number 


Oo HD 


TASNAT AAA 
YEU L IR 


FOEXT 
FOSTZ 
FOSWIT 
FQMODE -° 
FOFLAG File”’s flag 

FQOCOML 26 Internal return dissatch 


t~ 


tugeword file name.in Radix-450 


Extension in Radix-56 


mom HD 


Open for Gucput swith 


Mode indicator 


NN N KF FE 
m Ww 


FODEV RYO) 2-byte Ascil Jevice nane 
FODEVN 32 byte Lene? aire Stee Lage ee 
FOCLUS 34 tite ztluster size 
FOFUNL 36 byte Chaining function 
FOFUN2 37 byte Internal extra cuactlen 


Alternate entries (for special situations) 


Symbol Offset, Usage 


Segments in file or segments to fhfan 


FOERNO 4 Error message code and text beqinnins 


FOCCOM3 6 Internel data 

FQCOM2 16 Internz1 return adress 
FONAM? 20 3-wor’a new File memp.ext in Radin- 
FOBUFL 20 Default watfer Length 
FQCOM 34 DOB Jark sddress 

PONENT 36 thinness OP Ge eoetees ori 


FOQPROT 37 byte ata 


. 


sao 
om 
Aw 
OQ 
Las 
bu. 
2) 
t 

s 

rn 


XRB TRANSFER CONTROL BLOCK 


length of IO buffer in bytes 


aa 0 
ee 
“pointer to buffer staxt fox xfer | 

channel number for Xfer ss t—~—t 6 
“starting device block no for Xfer | 10 
wait time for IY input 
os TE 
XRBSIZ taceeen eS es ee if 
Sennen Peer eee - 

22 

24 

26 

| aie eee 

32 

ae cou e!: 

36 


Used by User to initiate an I/O request and for Monitor/user 
data requests. 


Values in 'XRLEN' and 'XRLOC’' and 'XRCI' must be even! 
Value in 'XRLEN' must be > = the default value 


Value in 'XRBC' must be < = value in 'XRLEN' 


o2- S$ 


ca 


Input 
Control 


Area 


Output 
Control 


Area 


LINE PRINTER DDB 


device handler 
index 


Status and 
access control 


sss ene siping ia inet pai 3s St Sh 74 
j 


init owner ich index 


Cl: ck time at which device was assigned 
SR A ASN SR a a RR OCA mitenes' 


> 


Vertical position Horizontal pesiticn 


a SEO TRO AE A NNO aes tee 


CN. AY yO tee RO ee 


Output fill buffer pointer 


A SO ER TU NR Ok NO eR erie La 


OE: OAC ee NRE OIE LR 


Output fill count 


AS NT OE A eR IP A TO A tS 


Output empty buffer pointer 


eet pa merger Jota 


Output empty count 


EEE EA A SE TF EE A NT OI A RY Nt EME com 8 


| 


Output buffer count 


a = a cae on narnia + Nem vm erreae emetantereamntt nant my 


' 


# lines per page | # characters 


ere | 
4 
J 


i 


ER Ne A ETA ERE RE RS OPE a EE ER Ue OTE Ven SNE seme neh 


a 


+? 


#4 


| 


Device Data Block, continucd 


Offsets into the Input/Output control groups (relative to 
DDINP and DDOUT respectively) . 


Symbol Offset 


FP 0 
FC 2 
EP 4 
EC 6 
BC 10 


Usage 


2 SY EN Y= 2 ete ne meat 


Fill pointer * 
Pili count (-=37 to =) 


Empty pointer 


Empty count (-37 to -1) 


Buffer count (as a byte) 


Bit assignments for the DDB status words are as follows: 


DDSTS 
Symbol Value 


DDSTAT 100000 


DDWLO 2000 
DDRLO 1000 
DDNFS 400 
DDCNT 


Symbol Value | 


DDASN 100000 
DDUTL 40000 
DDCONS 20000 


Usage 

Internal status, cleared by "close" 
Write-lock for devite if set 
Read-lock for device if set 


Device is not file-structured 


Usage 


Device assigned through comnand 


Device assigned for utility sequence 


Device is the console device 


SYS 


vice Data Block DDB 


beon tame a device is initialized, the tnit count in Doce? 


repented; when the device is closeea, the coun 


aed 
aS 


t is de 


Lhe count goes to zero, and the device was not assica 


.% is returned tc the system; otherwise iz is retained 


gop. 
The non-devico-dependent entries in the pos aCe: 


Symbol Offset, Usage 


0 byte Handler index findex into 
Bots 1 byte 
DDIENO 2 
DDUNT 


s ’ 
Status and neeees controg 


byte Device/Disk unit ronoer 


DDHORZ 
DDVERT 7 byte VGVULCAs i.e pe Fe 

DDINP 10 input control. érea 
DDOUT 22 Output control area 

- SHORC 34 byte Characters per line + 2 


byte Horizontal resitios 


WOVERC 30 (DyG Lines per page 


assignment status. 


PDCNY 36 nat Count’. for device, ‘hia 


~USyTt Ty RE 
eM MM 


tov de 


3 
DDTIME 4 Tame assigned or jinitini ined 
6 


cen. 


16) 


wy Lt : 
Oy oom, 


has 


ay LC 


byte Owner Job inde: (ees 4f types ebsF X 2 


aay wUDs 


Unique 

Symbol Offset 
TTSTS1 DDSTS 
TTLINE DDUNT 
TTSTS2 DDVERT 
TTSTS3 DDVERC 3 


Definitions 


' Status 2 


offsets within PDB 


Usage 
Status 1 
Keyboard number times 2 


° 


Status 3 


TTY Status 1 values (Word values) 


Symbol Value 

NOOUTP 100000 
HAFDUP 40000 
NOECHO 20300 
TAPE 10000 
TT2741 4000 
TTODT 400 


ee ne ree on 


Usade 


Junk programmed output 
Local echo tty 

Don”™t echo on tty 

Tape. mode 

Terminal is an IBM 2741 
Into DDT-submode 


TTY Status 2 values (Byte values) 


Symbol Value 


TT33 
235 
TTESC 
TTXON 
TTRUB 
TTBIN 
TTTECO 
LTSTAL 


200 
100 
40 
20 
10 


Usage 


Model 33 tty (no hardware tab) 

Model 35 tty (hardware VT and FI’) 
Terminal has Ascii-68 escape (£SC = 33.) 
Terminal has XON/XOFF. feature 

Special rubouts 

Binary input mode 

Teco special modu 

Terminal may send XON/XOFF to RS'TS 


TY DDB Derinitions, continued 


T™TyY Status 3 values (Byte values) 
ET eet SE 
TTLA30 200 Terminal needs conputed fill 
TEPRTY © 100 Terminal wants parity added 
TEPURU 4u Terminal wants.odd parity 
TTUC 20 iranslate to upper-case on input 
TUPAR 10 Don~t print control characters with uparrows 
sIPILL ao? -& Fill amount (0 to 7) 


2-70 
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“ses Ct Bias] —— e+ —- irrees EE) 
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Pear oes ice ee a 
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bGi4 ; | at ees Sm aloe atone “(oent ¢ wu: ura ji 

| 17496 6 e edd resid = Key cave LTA DD t cae ze 
Dedl mau 1s | (C14 outpur 
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sm SORES 
lone entry | cack | 
per DG4 : 
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agi 


Tur: 


~ | ae ASRS. example LARPS 2.2808 
+G' Bios éatry Pt +d) ‘bite -ppitera “to be eae 7 Gr, . | 1 34,. . : 


; MTZ) ait -OSR “y 
: tor Piest 8211) | in patton fo! toh ood ' 
ene nine at +e: . fie eatoyt CS 4 I 
H10/4-word odtty "RoR RaHeon fe OR pa | | | 
| For ideal : * +4) Ny ¥c3 Tiers? | OE. ests a 
PCE i ON PBR patlera ton bi patien Fer! | | 
420, Fe weed only DOB 28 OD 4ORC [dou vrsTsa | cTsTSB Sy ' 
«Fee this pesit eset SAG ae pin ace nn oy. 
; } cee dee. Bio ler ip ahaa sod. ee. he Se cae ie 


2 eee 


data terminal Fei) : 
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TTY DDB 


status DDSTS device handler 


: 


index DDIX a 
device DDUNT DDJBNO +2 
unit num owner job index 
Clock time at which device was +4 
assigned or inited, 

DDHORZ +6 

Input fill buffer pointer DDINP +10 
Input fill count +12 
Input empty buffer pointer +14 

empty count +16 
Input buffer count +20 
Output fill buffer pointer DDOUT +22 
Output fill count 0 +24 
Output empty buffer pointer +26 
Output empty eount. °* —— +30 
Output buffer count +32 
Status DDVERC ‘horizontal max DDHORC | +34 
Assignment init count for +36 
Status device DDCNT 


nn 


DEVICE DATA BLOCK (DDB) 


These 16 word blocks are permanently assigned to each device and 
teletype in the system. The device table (DEVTBL) contains pointers 
to each DDB... 


If a device is assigned to a job, then the entry in "DDJBNO" contains 
the number of the owner job. If 0, the device is available. 


Fach time a device is init'ed, the init count in "DDCNT" is incremented . 
‘When the device is closed, the count is decremented. If the count 

goes to 0, and the device was not "assigned" then it is returned to 

the system; otherwise it is retained by the job. 


The non-device-dependent entries in the DDB are labeled. 


a. af oo Se 


ae . I/O Handler Index 
7CSTS (Disk File Handler=0) 


Segment Count for 
3 FCUNT File Unit Number | Current Transfer 


Number of Segments in File 


Next Logical Block to Read/Write 


First Logical Block in Window | 


Name Block Offset File Cluster Size 


Physical Segment Number of 


LSB _Name Block 
MSB Set by vece to Relative CMA 
UFD Address of Next Retrieval 
‘rieval Window 
lock ‘ 
~ Physical Address of Segment 2 of Cl1.N 
oe N+1 
N+ 2! 


FCB and RETRIEVAL BLOCK DEFINITIONS 


FCSTS DEFINITIONS 


FCIDX 0 
FCBC 2 
FCSIZ 4 
FCNLB 6 


FCFLB 10 


-FCLUS 12 . 


FCDNB 14 


FCETC 16 


FCWND 20 


7 cluster pointer 


FCNLBB = 100000 If 1, the ‘'FCNLB' is backed up 

FCFUFD = 40000 If 1, the open file is a UFD 

FCLOCK = 20000 If 1, the current buffer is locked 
FCNOEX = 10000 If 1, the file may not be extended 
FCUPDT = 4000 If 1, the file is open for update 
FCWRIT = 2000 If 1, user may not write file 

FCREAD = 1000 If 1, user may net read file 

FCUSE = 400 If 1, this user got lst write priviledge 


File Control Block 


DDSTS Status __ #DDIDX _Handler Index g 
FCUNT File Unit # | FCBC # Blks in Buffer 2 
:  FCSIZ # Segments in File 4 

FCNLB Next Logical Blk to Read/write 6 

FCFLB First Logical Blk in Window 10 

FCANB  £éName Blk Offset/2 [FCLUS File Cluster Size } 12 

FCDNBL Phys Seg # of name blk 14 
16 

FCWND UFD Address of next RB 20 


DDNFS 1 if non file structured 

DDRLO 1 if no read access 

DDWLO 1 if no write access 

FCUPDT 1 if open for update 

FCNDEX 1 if file may not be extended 
FCLOCK 1 if buffer locked 

FCFUFD 1 if file is UFD 

FCUSE 1 if user has lst write privileges 


cx] — bit 


Disk Request Queue Entry Block 


DSQ 


DSQ Queue Link 
DSOL3IQ L3QUE Bit to Set at completion 
DSQXDA Ext. Disk Address 

DSQDMA Disk Segment # 

DSQXMA Ext Core address of transfer 
DSQCMA Core address of transfer 
DSQUNT Unit # DSQENT Seg CNT of Xfer 


DSQMSG FCB Ptr 
DSQTOT Total Transfer Counter 
DSQPDA Phys. Disk Address 


DSQTMP Temp Storage or Drivers 


This block of 16 words is passed to and from the disk drivers 
to initiate disk data transfers and to signal that a transfer 
has been completed. If the transfer was not done the block 
is passed back with a zero count in DSQERR. 


DSGFUN 
read - 105 
write - 103 


a2 /S- 


DSOFAR Que Fairness Or Priority {| DSQFUN Op. Function Code | 


DSQOPT Disk Optimization Word | 
DSQ SAV Saved Function | DSQDUN Unit # * 2 


DSQPUN Unit # DSQTFN Temp Disk Function | 


IMPORTANT INFORMATION © 
IN MONITOR 


DIGITAL EQUIPMENT CORPORATION 


TOWCOR 


Virtual 000000 to 000776 is for vectors 


DATE _ Current date 1000 
| TIME | Current time 1002 
| TIMSEC | SECS to next min 1004 
Interrupts to next sec 1005 
Current job * 1006 

NEXT Next job to run %2 1007 
PTR to current job 1010 
| JOBE PTR to curren ags (JDFLG 1012 
“PTR to current IO status (JDIOST)| 1014 
| JOBWRK 


JOBWRK PTR to job work block 1016 
JOBTIM Run time in tics this run 102C 
JOBONT Used residency quantum in ticks 1022 


SIRT tome WEE Ww wet LIN at db dA th 


m+ oe ne 


MAPLOW 


RTSLOW | 


RTSJOB 


CONTENTS 
Start of Holding Chain 
End of Holding Chain 
ODT Saved Addr Register 
ODT Saved Description Reg 
Tick Delay L3Q Bits 
Next Tick L3Q Bits 
Leve Queue Bit Pattern 
Pointer to lst Free Small Buffer 
Count of Free Small Buffers 
Pointer to lst Free Big Buffer 
Count of Free Big Buffers 
NOn=4ero 1£ OUt Ot Small Buffers 
Running Job's Quantum 
Non-zero if out of Big Buffers 
Extended Address Bits 4 + 5 
Low Order Address 


( 
{ 


Pointer for Next Spot to Sub-schedule 
Round=-Robin Job Numbers (3 bytes) 
Round=Robin Job Number to Force Out 
FPPInterrant Flag/FPP Exception Code 

FPP FEA goes here on error. 

Link to RTS Description Blocks 

Non-zero if Ptr to RTS Desc. Block to Load 
Cortbl Ptr to start of load (or #) 

Cortbl Ptr to End + 2 of load (or @g 

Job #X2 to signal on land done 


Ea ee 


Monitor Core Map ;;.1 


(Part of MONCTL axea) 


IDENT CONTENTS 


(Relative) 66{SWPMAX | 
te Shwe  FO/SWDONQ 
of McxeTe 72|SWPDSQ __—*«|:«sSSwapping Parameter 


Ares 


File Base 


132{SWBASE | Swap @ sys [@, Ti 
De ee el 


136 SWAP 1 Sys i@ File Base 
142 | SWAP 2 Sys[@, I|File Base. __ 
146 SWAP 3, Sys(@, 1) File Base 


152|SWhca r 


ee ety 
i; scanners iaisiemae 


164 


# of Active Bytes in "SWPMAP" 


SWAP 1 Bit Map 


Bit Map 


204 SWAP 3. Bit Map 


= 
~J 
f 
Y) 
= 
Fo 


Monitor Core Map //.2 
(Part of MONCTL area) 
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DSk PUP Fasseieeansiviniannteitensetten 


* 
~~ 
oa 
= 
ON 


DEVNAM: two byte name table for device types 
(RF, RK...XX, YY, 22) 


—— 


disk sizes in sectors (least signi- 
ficant) 
disk ‘sizes (most significant) — 


tee eee 


DKSIZM: 


_/ 
DEVCNT : Device unit number maximums | 
DEVPTR: Device unit list (disks, Y' ioe cone 
Pointers to DDB pointer table. | 
TTXLST: terminal characteristics list (modems 
only DC1ll, DH11, etc.) Address of 
CSR's status bits. 


table of I/O CSR's for terminals 
(INPUT) 


eens ee ee emo e  me 


‘table of I/0 CSR"! s for terminals 
(OUTPUT) 


Fics Aas rf 
: ! +t 4 
: 


WORDS 


DIGITAL EQUIPMENT CORPORATION 


LEVEL 3 QUEUE 


EAE EOSIN 


| 1 |- | | Spare (2780) 
| | Lees FIP to be ru 
QSWAP run the swappe}) 

| 


'OQFILE file Z/O driver | 

be run 
QDTSYM Dectape symbiont tc 
2 be run 
i 
i 
{ 


On er en UP a i it ee: 


QBUF "big buffer available" 
alerter 
QBUFSM "small buffer available' 
alerter 
QDDCON Dectape I/O driver complete 


oe: 


ee ee eect 
a . ——— 


QDACON Dectape block allocator comple 


oT sindinTTinn a ee TE wn mei intr En eg =. maar A eter 


QUECDR Cardreader IO done 


\ 


QMTACM Magtape bring into core complete 


poe Magtape I/O done 


REIS EE LOE TE CN te RE Te EE 
LRG ce EE RE RE NE TIA TIET 


QBRIDG Schedule Core Manager 


QSCHED Scheduler to be run 
QFORCE Force a jobout core task 


QTIMER Timer service to be run 


JOB FLAG ASSIGNMENTS 


JDFLG 


12} 11 2 Q 


| ——— JFPOST = ches’ “Inez 7H 


ere anes se 2g . hee . 
aecomacmucoge © i i a COnTLOL S hupest ey we 
> Y 


seemed ieee TT 


eT CY TT CT | an timarm NNEC: TY 


dl 4 * Ton : a ered nsfaats wag, t Oe: an eee 
| Enmenemreeccomeen TE ICO 2 Mick contra ate tyne 
i § aaa ne: i Bac Se deeinead Bs > Cm . 
; RSG 3X23 Time an fer sey os 
oye em adore 4, ST ayy 
Torc#irg yoh (no Y/o Rawr 
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SWaO EFor yor 
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| ay, The iV permarent privileges 
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Ta 
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| 
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ry : oh CS ee ne Ty Bee New ee So 
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eee ral een aie aR job is to stay in core 
i f 5 
gc teenie » wo-ceremmeeinesen 0 ET tee Peeayyt saath we ae ~a07 a wy 
ner emneerermenen nears ts ae + y PEMA TSN (Oe. ab UNGER Rota cote 
om 
JDFLG2 
=e 
cad fa’ 
61 5 3/2 
eneereencamere namespace — 
{ . “t ne 
t i i j 
a 5 
ao 9% sh cutee ef lid 
ie Rh ee ne, 7 Sea ae See is ps 
i f in ae ae ae ULGat plow Re Sil 
" ; TET ee ii ga Sys ble 
| | | | eee eee ss ere SE PR 3 re Tivy favs t 
' 
| | | ! Eee ee ee seem r ree TE BT AY ran cotyy “477 p20 
y : 2 ase 
| t | REE eet rien T in I oni t L 1 ae J H 
Sepa oo ei Stes} eve Slog CRIP SNTR 
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} Lo JER EE Pe Ses Se. Soe a tous, 
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| ~ SF LOST Fost *re i/6 Br 
JFKEY post keyword gor yr. 


JBSTAT AND JBWAIT 


15)14 12)11 , 


8 615 32 0 
Pe ee eee ee 
JSDSK disk wait 


JSKEY KB input wait 
JSDTA DECtape wait © 
JSLPT line print wait 
SPTR paper tape reader wait 
JSPTP paper tape punch wait © 
SCDR card reader wait 
JSMTA Magtape I/0 completion 
-SSXXX XX WAIT 
JSYYY YY wait 
JS2ZZZ ZZ wait 
elbow oe i teleprinter wait 


| : SFIP file processor wait 
JSTIM sleep wait 


JSMUL small buffer wait condition 
JSRES in-swap required 


JSALL=64172 
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Disk File Optimization 


1. Optimize the Pack Cluster Size for each disk. 


The pack cluster size is optimum when the entire SAT 
(Storage Allocation Table, stored as (0,1) SATT.SYS) 
can fit into the 256-word buffer in core beginning 
at SATBUF. To effect this, each RK disk should have 
a minimum pack cluster size of 2, and each RP03-disk 
should have a minimum pack cluster size of 2 and 
preferably of 4, RF disk units with less than 5 
platters can have a pack cluster size of 1, but RF 
units with more than 4 platters should have a pack 
cluster size of 2. RP)4-disks have a minimum of 4 
and should use 8? 

2. Use private packs for production files rather than 


the public structure. 


Whenever a file is opened on the public structure, 
the directories on every public disk have to be 
searched, either to verify the file's existence or to 
ensure its non-existence. This overhead of searching 
more than one disk can be avoided by placing the file 


on a private pack. 
3. Dédicate complete structures to large production files. 


If possible, dedicate an entire private pack to a 
single large production file. This will ensure 


s-/ 


Disk File Optimization (Cont'd) 


efficient directory organization and will minimize 
disk "seek" time for data processing/accessing. 

When it is necessary to put more than one iile on 

the same pack, dedicate a whole account to each 

large production file. This will minimize directery- 
search overhead. When it is necessary to put more 
than one file under the same account on the same 
disk, then create the large files before the small 
ones. This ensures better organization of the 


directory structures. 


4, When possible, keep distinct files accessed by “he 
same program on distinct disks. 


If a program accesses more than one file and if aii 

of these files are on the same disk pack, then disk 
head movement will be required every time the program's 
current reference to a file is different from its 
preceding file reference; thus a large percentage 

of execution time will be spent in moving the disk 
head back and forth. On the other hand, if each file 
referenced by the program exits on a distinct disk, 
then no head movement is required when changing from 
one file reference to another in the program; the 


heads will simply move cnce when tne location of the 


data itself requires it. 


Disk File Optimization (Cont'd) 


5. Pre-extend files to their maximum length. 


Creating a file at execution time by sequentiai 
printing of data, by sequential writing of a virtual 
core array, or by sequential putting of records entails 
a high overhead of repeated calls to non-resident parts 
of the File Processor in order to extend the file 

each time another sector is required. This 

needless overhead can be avoided if the file is 

already in existence at its maximum length or if it 

is created at its maximum anticipated length before 

any Significant data is written upon it. Thus at the 
beginning of any program which is to create a long 
file, the highest record number should be put or the 
highest element of the virtual array should be 

written (even with meaningless data) before any 

other writing is done. This applies also to scratch 
files. The FILSIZ option can also be used to pre- 


extend files. 


6. Use Record I/O disk accesses wherever possible. 


Formatted ASCII is the slowest RSTS I/O. It examines 
each character one by one for delimiters, line 
terminators, etc. and executes conversions between 
internal binary forms and external ASCII representations 
for all numerical data. Virtual core I/O is fast 

for a given individual array, but it is not record- 


oriented. When a logical record includes more than 


Disk File Op 


timization (Cont'd) 


one item, virtual core I/O will scatter the elements 


of the same logical record into different areas of 


f 


the disk, grouping them by their array type and name 
rather than by any relevance to the same record. 
This may multiply disk accesses in a program. 

Record I/O as its name implies has been designed 

for processing records, in either sequential or 
randon-access mode. It packs data efficiently and 
groups data by record organization. This minimizes 


the disk accesses needed for processing any recerxd. 
7. Optimize files' cluster sizes. 


Since at any given moment the current retrieval iniormataor. 
for a file is stored in core in the "window" of the 

file's File Control Block, retrieval overhead can 

be reduced to a minimum if the file's cluster size 

is such that the file does not need more than 7 total 


clusters. 


8. Re-start from cleaned structures whenever possible 
When an account is first createc and the first file 
is created under the new account, the linkages in 
the directory structures will be in the optimum 
order for fast and efficient directory nardiing. 
After a number cf deletiors, extensions, ind sew 
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Disk File Optimization (Cont'd) 


linkages may then point forward and backward in | 
whatever fashion was necessary to update the directory. 
Consequently, to ensure that directory structures | 
exist in a form optimized for fast access, it is best 
that disk pack periodically be re-structured. This 
can be done by using the DSINT program to prepare a 
fresh pack and then transferring to that pack all 
files which are to be accessed on it. Likewise an 
account should periodically be re-structured by first 
"zeroing" the account and then transferring to that 
account all files which are to be accessed under it. 


(Save files elsewhere before zeroing the account). 
9. Optimize record size if possible. 


If a file has a cluster size larger than 1 and if the 
size of the logical records to be processed exceeds 

512 bytes, then an explicit RECORDSIZE of 1024 or 

greater will speed execution. This is true because 
RECORDSIZE defines the size of the user's buffer area 

and when the cluster size of the file allows it, the 
system will fill/empty the buffer in one disk access 
rather than in multiple accesses. If, however, the 
logical records to be processed are less than 512 

bytes in length, then little is to be gained by departing 


from the default record size of 512 bytes. 


Disk File Optimization (Cont'd) 


LO. 


Keep production accounts distinct from development 


accounts. 


Because extensive file deletions, modifications, and 


creations can leave directory structures in an order 


and because development work should always be clone 
under accounts distinct from those under yhick 


production files are kept. 


The DSKINT option will initialize a disk to the minimum 
RSTS file structure. A single or multi-platter RF disk, 
a single RK@5 cartridge, or single RP#3 disk pack may 

be initialized as a public, private, or system disk. In 
addition to writing the minimal file structure, DSKINT 

checks the whole disk for bad blocks by performing write 
and write-check éperations over the total disk area. In 
checking for bad blocks, DSKINT will use from 1-8, test 


patterns as specified by the user during the DSKINT dialog, 


The minimal RSTS file structure includes the master file 
directory (MFD) and the UFD for the system file account 
[@,1]. In the system file account, two files are created 
during the DSKINT process. The file BADB.SYS contains 
all bad blocks detected during the bad block checking 
phase of DSKINT. Bad blocks are permanently allocated 

to this file and may not be used during normal Time- 
Sharing operations. The second file is SATT.SYS which 
contains the storage allocation table (SAT) for the disk. 
The SAT contains one bit for each cluster on the disk. 
The size of SATT.SYS is therefore dependent on the size 
of the disk and the pack cluster size specified in the 
DSKINT dialog, the size of BADB.SYS depends on the 

number of bad blocks detected. Public and private disks 
contain only this minimal structure. The only difference 
between public and private disks is a "private" bit is 
set in the MED for private disks. In initializing a 


system disk, DSKINT will also write, in addition to 


— 
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the minimal file structure, the MED entries required for 
the system library account [1,2], the library UFD and all 


library files are created under normal time-sharing operations. 


When a new system is created by the system generation 

"Core Image Library" or "CIL" is written somewhere on 

the dick and a hootstrap is written into physical sector 
zero. If the CIL is written on a blank disk (i.e. freshly 
formatted disk). the disk should be booted as explained 

in System Manager's Guide and then the DSKINT option must be 
used to write the minimal file structure. DSKINT will not 
destroy the CIL which was written during SYSGEN. In this 
case, DSKINT will also create the file RSTS.CIL under 
account [f.1] to map the CIL. The refresh option should 


be used to create the other system files under [g,1}. 


Bootstraping is the mechanism by which the Cli area is 
defined. Hence, initializing a disk as a system disk 

will only preserve the CIL if it was booted, It is however 
possible to initialize a disk as a_ system disk and write 
the CIL later with SYSGEN. The procedure in this case is 
to mount any RSTS system disk on unit § (RK or RP) or to 
load a RSTS system onto an RF disk, boot this system disk, 
mount the disk to be initialized on any other disk drive, 
request the DSKINT option, and answer the DSKINT dialogue 
questions for the disk to be initialized. This procadure 
merely writes the minimal file structure plus the library 


account. It does not preserve anything on the disk 


If a new CIL is written on an old RSTS system disk 


J 
(containing RSTS files), the DSKINT option should not 
be used since it will destroy everything except the CIL. 


In this later case, the refresh option should be used 
to map the new CIL into the file RSTS.CIL and to 


verify that the file structure has not been corrupted. 


Disk terminology 


sector the number of words transferred: 


ro anemia nt eearmecionmes 


256. words for RK and RF, 1024. words “sr RP 


physical disk address the hardware-oriented address 

numper an index to a sector relative te a know: 
physical address. . 

logical number an index to a sector of a tile relative 


to the beginning of the file. 


cluster a contiguous group cf file secters, 
cluster size the numbei of sectors in a ciusrar 


(mush be a power ci 2: 
Disk file structure 


RSTS disk files exist in clusters of 256. (1024.) werd sectore. 
The sectors within a cluster are always physically contiguous. 
The clusters themselves may be physically contiguous to each 
other; however, they may be scattered randomly across the 


surface of the disk. 


Directory files 


MFD (Master file directory) 
The MFD on any file unit 1s a single file whiz 


. a ee ih he ee are ea Fiie unit 
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Directory files (cont'd) 


(b) 
(c) 


(d) 


Maintains accounting information for those accounts, and 
contains pointers“to the beginnings of their respective 
UFDs. 

The MFD also contains all needed information for 


accessing any part of itself. 


UFD (User file directory) 


There is one UFD for each user account on a file unit which 


(a) 


(b) 


(c) 


(d) 


catalogs all program and data files under that 
account on that file unit, 

Maintains accounting and access information for those 
files, and 

contains all needed retrieval information for those 
files. 

The UFD also contains all needed information for 


accessing any part of itself. 


Program and data files exist on the disk as pure data clusters. 


They contain no retrieval information (i.e., no link-words) and 


no structural information. 


Allocation mapping (the storage allocation table SAT) 


A bit-map table (in file SATT.SYS) is used to record 


which disk clusters are allocated and which are free. 


Each bit in the SAT corresponds to one pack-cluster. 


When a cluster is allocated, the corresponding bit is 
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Allocation mapping (cont'd) 


is cleared. Note that the SAT records pack-clusters, 
and that one file-cluster may represent several (up tc 


256.) pack-clusters. 


The SAT is manipulated in core. It is read from SATT.SYS 


into a 256. word buffer called SATBUF. 


Directory structures and retrieval linkage 


Each 256. word sector of a directory is logically subdivided 
into 32. block(ette)s of 9. words each. The following 


blockette-types exist: 


label only in sector (0 of cluster 0 of the UPD or MPD. 


FDCM file directory cluster map. 
NB name block. 

AB accounting blosk. 

RB retrieval block (only in UFDs). 


HO hole (blockette which is not in use) 


The first sector of an MFD on any file unit is always 
located at sector i. 

The sector number of the first sector of each UFD is 
contained in a pointer within the MFD name blocksete 


for that account. 


The 
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Directory structures and retrieval linkage (cont'd) 


threaded lists of NBs (NBs and RBs in the UFDO chained 


together by link words. 


Cataloging limits 


The maximum number of user accounts that can be catalogued 


in an MFD is 1735. 


The maximum number of user files that can be catalogued 


in a UFD is 1157. 


Directory Structures and-Retrieval Linkage 


1) Directory Structures. 
1 The MFD is always located at sector $1 on RKO5's and at 
sector #2 on RP03's 
2 Each 256-word segment of a file directory is logically 
subdivided into 32 blocks of 8 words each. 
3 The first block of the MFD is a label block 
4 The last block of every segment of a directory is the 
FDCM (File Directory Cluster Map). Every copy of it 
throughout a given directory is identically the same. 
5 Any of the other blocks in a directory segment can be 
used as: 
NB --- Name Block (in MFD or in UFDs). 
AB --- Accounting Block (in MFD or in UFDs). 
RB --- Retrieval Block (only in UFDs). 


Any block never used or returned to free status is 


S-/3 
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Classified as a 
HO --- Hole (in MFD or in UFDs). 


Retrieval Linkage. 


N) 
ar 


The first segment of an MFD on an RPO3 is always located 
at sector #2 and at sector #1 on on RK@5 

The segment # of the first segment of each UFD is contained 
in a pointer within the MPD Name Block for that 
account. 

The first word of a MFD or UFD contains a pointer to the 
first Name Block in that MFD or UFD. 

That first Name Block contains the beginnings of 
threaded lists {of NBs in the MFD, of NBs and RBs 
in the UFDs) chained together by link words. 

The linking directs the access forward to any desires 
part of the directory. The linkage, howevei, is 
forward only. To regress, it is necessary to stert. 
once again from the beginning. 

3) Addressing modes. 

Two modes of addressing are used in the directories. 

Some "address" entries are pointers containing the secment# 
(relative to the beginning of the disk) where some de- 
sired information begins. E.g. UAR entry in MFD's NB, 
and entries in FDCMs and RBs. 

Other "address" entries are link-words, structured as 
indicated in the illustration. 

4) Cataloguing limits. 
The structure of the directories imposes certain maxicun 


limits on the number cf arcounts and files whiah 
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Directory Structures and Retrieval Linkage (Cont'd) 


can be catalogued. 
Maximum number of user accounts that can be catalogued 
in MFD is 1735. | 
Calculated thus: [(7 clusters/MFD) * (16 seeeees cluster) * 
(31 blockettes/sector)-(1 label blockette) J,;. 
(2 blockettes/account). sa 
Overhead for cataloguing 1735 accounts is 
11% for RF system disk with one platter, 
2.5% for RC/RK system disk, and 
§.3% for RC/RP system dis. 
Maximum number of user files that can be catalogued 
in a UFD is 1157. 
Calculated thus: [(7 clusters/UFD) * (16 sectors/cluster) * 
(31 blockettes/Sector - 1 label blockette)]/ 


UFD 
(3 blockettes/file). 


Clustersize 


Advantages of large cluster sizes: 
Reduces size of directories. 
Reduces required number of disk-accesses to directories. 
Reduces fragmentation of files on disk surface and fewer 
"seeks" will consequently be required to access a 
data record. But seek time may increase for 
individual seeks. 
Advantages of small cluster sizes: 
Avoids wasting disk space. 


Lessens risk of being unable to create or extend a file -- 
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Clustersize (cont'd) 


i.e. after many creations, extensions, and deletions, 


a disk may still have sufficient free space to 


accomodate small clusters but lack sufficient 


contiguous space to accomodate large clusters. 
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‘ack (for non- 1 L&., 
system disk, 2 for 

public and RPO3 

private) only 

Directory (both Pack 16, 
for MFD and UFD) 

File Pack 2565 


At initialization time 
via DSKINT option 


{or REFRESH for RSTS V4) 


At creation af the 
directory via either 
DSKINT, REACT. or the SYS 


function. 


At creation of the file 
via either OFEN or 


OPEN FOR OUTPUT 


ve 


File unit designation 


(a) 


(b) 


General unit designation: 
DF:, DK:, DP:, or the null unit designation refer 


to all "public" file units. 


When a file is to be created under this designation, 
the system will select the public file unit containing 


the most free space. 


When a file is to be retrieved under this designation, 
the system will scan all public file unit directories 


until it finds the designated file. 


Explicit unit designation: 
DF@:, DK@:, DKl:, DP3:, etc. refer to specific and 
distinct file units, which may be either "public" 


or "private". 


Access to files 


(a) 


Protection codes and privileges: © 
The protection code byte designates 
1 read-protect against owner 
2 write-protect against owner 
4&4 read-protect against group 
8 write-protect against group 
16 read-protect against others 


32 write-protect against others 


8-1/7 


Access to files 


If a user 


running a 


(cont'd) 


compiled Basic program (oniy RSTS V5) 
privileged program status for compiled 


program 


is logged in under a [1,x] account, cr is 


privileaed pnroaram, the nroaram is allowed 


all protection-code limitations -- i.e., 2 


to bypass 


0] 
i} 
ih 


privileged program may read a file irrespective 


file's status. 


If neither the user ner the orogrem is running “‘privilegved", 


the restrictions imposed by a file's protection code 


apply. In such cases, no one c4n read, write, cr delete 
any file protected against him, and the system will not 
cn Po 


allow renaming or modifying .BAT files (RSTS V4} 


or 


whose extension is .BAC and/or have a orotection code 


indicating that they are compiled (RSTE V5). Tn such 


editecr is able to create rr 


cases, only the system 


transfer .BAC files. 


Normal and Update accessing. 


Normal accessing of cisk files. 


When a user attempts to open a file in normal mode, th<« 


a "protection violation” error 


(which may be 


: = : 3 = id 4 FS « rn Poesy = i ra 
statement) if the fi Peed wmemred Su 


Normal and Update accessing. (cont'd) 


someone else in update mode. 


Then system then determines the user's read and write 
privileges as based on his account number and the 
file's protection code. The result may be read 


privileges, write privileges, both or neither. 


The system then determines whether the job is running in 
privileged status, either because it is a privileged 
program (bit 128 set) or because it is under a system- 
manager type account [1l1,x]. If such be the case, 


priveleges are changed to read-write. 


A check is then made to determine whether someone else 
has already obtained write-access to the file. 
If so, any write-privileges are taken away from 
the current petitioner. 
If, as a result of the preceding, the job has neither 
| read nor write privileges, the system issues 
"protection violation"; otherwise, it proceeds to 


open the file. 
Update accessing of disk files. 


If a user attempts to open a file in update mode which 
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Normal and Update accessing (cont'd) 


is already open in normal mode, the system 


e 


issues "protection violation”. 


The system then determines the user's privileges as 


outlined above. 


If the job has, as a result cf the preceding, beth 
read and write privileges, it is allowed to procecs: 
else the system issues “protection violation”. 
The above outlines the process under RSTS V4. RETS Vo may 
have some subtle differences (especially regarding priviiege: 
users). The privileged user or program under RSTS V5 is 
allowed to open disk end DECtape units In non-file-styvetured 


mode. GET and PUT thus cefer to physicsi biceks. Sor ei 


OPEN "DK@:" AS FILE 1% 


opens DK# in non-file-structured mode. 
Pointer values in the Booa’strap Block 


Offset, Meaning 


160 The absolute starting logical block of the furs 


7) 
tf 


CIL core image 
162 The load address of whe Tacet Col, Core LOAGS 


164 The size in bvte-. oo kus vars* Obh sore avo 


Pointer values in the Bootstrap Block (cont'd) 


166 The transfer address of the first CIL core image 
170 The CIL logical block size in words per block 
172 The first address (Pseudo load address) of the 
“bootstrap (I.e., where bootstrap relocates to). 
174 The external page address of the system device 


176 The absolute starting logical block of the CIL 


Bootstrap operation: 
After relocating itself to high-core (using the address set 
in location 172), the bootstrap sets up a transfer from the 


disk using the following parameters: 


disk address word 160 
word count : word 164 
memory address word 162 


If the transfer was successful, the program is started 


using the address stored in word 166. 
The bootstrap normally relocates itself to XXX250 where 


'yxx' refers to the highest 4K bank of core available 


(up to 28K, of course). 
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FILE KRECTO 
ce. 


; 
: ; 
ay ! 
Ficé DIRECTORY 
CedSTER MAP f 


NAME BLOCK 
Accounting Block 


Retrieval Block 


——— denotes a link (offset relative to 


sector ) 


ene denotes a pointer (absolute secfor address) 


began: nq 


— 8 worps cence. 


LINK 
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LINK TO WEXYT 
Hennes = 
PorxTeR TO © 


POINTER To 
ccusren 1 
POINTER To 
CLUusTE 2 

PointTeR TH 
Clusre 3 

POINTER To 
C.ustTeR 4 


TO NEXT 
8 


POINTER TO 
CLUSTER 
POINTER TO 
ccusreR 8 
POINTER To 
ccugrer 9 
POINTER Yo 
CLugréR 16 


an 
) 


POINTER TO 
cCusTeé 
POINTER To 
CLUSTER ~ 6 


| Actual 
Seg #'s 
Locations 
Pure Data 
FILE ataes 
#o 
wi 
a £2 
: ere 
la Ere i @rc 
wv 
H e 
: + pEG OF A-T 
J aed A~d | a a-2 
I u SEK I) en-| 
PEO. val an 
| cToR @ H+ anes 
* s a¢ ; @ ne? 
ae Z SECTOR At ere 
Le ene = oi 
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‘SG 


SECTOR #en 


Crusrere #2 
m 
— 
n 


&cTo 


eT 


Ete 


N = # of sectors in file 


na # of sectors in cluster. 


Eacn sector 


Tv 
¢c 
ws 
d 
® 
3/2 


256, WoRDS. 


SECTOR & T8a- 1 


? 


_ SECTOR #28- fe wen-s oor 2 


Rowen #2n-2 
-@2n 


LILI LE 


The number of retrieval blocks per file is Not limitec ...As manv 
as needed are used and are contained in UFDB. 


Large 
There are seven cluster pointers per Retrieval Block 
Each cluster pointer points to a beginning segment number for the 
File Cluster of sectors. The Segment Number is Not a physical 
All of the sectors in a cluster are physically contiguous. 
In 5-21 PAK always cleaned on Start 
In 5B-24 PACK cleaned if Bit 15 Pack Status word of MFD is set 
during Start 
Refresh Pack is 


Default Pack is 


A OT EE Oa 
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s. 


MASTFR FILE DIRECTORY (MPD) BLOCKETTR FORMAT 


MFD LABEL 
(ONE ONLY PER MFD) 


LINK TO FIRST NPB OIN MFD 


PACK CLUSTER SIZE 


PACK STATUS 


PACK ID. (CHARS 1 ~ 3) RADSS 


PACK ID. (CHARS 4 - 6) RAD5¢# 


MFD ACCOUNTING BLOCK (AB) 
(ONE PER ACCOUNT CATALOGUED IN MED) 


+1 (TO SIGNAL THAT BLOCK IS IN USE) 
(-2 IF BAD DISK BLOCK) 


ACCUMULULATED CPU TIME FOR THIS 
ACCOUNT 

“ACCUMULATED CONNECT TIME FOR THIS 
ACCOUNT 

ACCUMULATED KILO-CORE-TICKS FOR 
THIS ACCOUNT 

ACCUMULATED DEVICE TIME FOR THIS 
ACCOUNT 
ACCUMULATED # | ACCUMULATED # 
OF _LOG-OUTS or _LOG-INS 
DISK QUOTA - OF DISK BLOCKS 
PERMITTED AT LCG-OUT 


UFD CLUSTER FACTOR 


MFD FILE DIRECTORY CLUSTER MAP (FDCM) 
(ONE BLOCK OF THE MFD) 


FILE DIRECTORY CLUSTER SIZE 
BLOCK % OF FIRST BLOCK IN CLUSTER @ 
IN MFD 


BLOCK #OF FIRST BLOCK IN CLUSTER l 
IN MFD 


BLOCK OF FIRST BLOCK IN CLUSTER 2 
IN_MFD 


BLOCK # OF FIRST BLOCK IN CLUSTER 3 


IN MFD : 
BLOCK # OF FIRST BLOCK IN CLUSTER 4 
IN MPD 


BLOCK # OF FIRST BLOCK IN CLUSTER 5 
IN _MFD ; 


BLOCK # OF FIRST BLOCK IN CLUSTER 6 
IN_MFD 


MFD NAME RLOCK (NB) 
(ONE PER ACCOUNT CATALOGUED IN MED) 


LINK TO NEXT NB IN MFD (OR @ IF END) 


PROJECT # 


PROGRAMMER #} 


PASSWORD (CHARS 1 - 3) RADSZ 


PASSWORD (CHARS 4 ~ 6) RADS? 
PROTECTION STATUS 
CODE CODE 


CURRENT ACCESS COUNT 


LINK TO AB FOR THIS ACCOUNT 


BLOCK OF FIRST UFD BLOCK FOR z 
ACCOUNT (OR 9) capes 


HOLE (HO) - UNUSED BLOCK 


CURRENT ACCESS COUNT - SIGNALS WHETHER 
ACCOUNT IS IN USE. IT IS INCREYENTEN 
BY 1 AT LOG-IN AND DECREMENTED 
BY 1 AT LOG-OUT. 


PROTECTION CODE IS MEANINGFUL IF UFD 
IS OPENED AS A FILE. 


PACK STATUS: 
IF BIT 14 IS SET TO 1, THE PACK IS PPIVATE: 
ELSE IT IS PUBLIC. SYSTEM DISKS ARE ALWAYS 
MARKED AS PRIVATE: WHEN USED AS THE 2YSTEM 
DISK, THEY ARE TREATED AS PUBLIC, SUT WHEN 
MOUNTED ON ANOTHER SYSTEM THEY WILL RE 
PRIVATE. 

BIT 15 IS SET TO 1 ON A “MOUNT” AND TO @ 
ON A"DISMOUNT". {IF A NON-MOUSTED CISS ilAS 
BIT 15 SET TOA 1, T'NEN IT WAS NCT PROPERLY 
*DISMOUNTER" (BG. SYSTEM CRASH) AND NEEDS 
TO BE “CLEANED”. 

BITS 33 - @ ARE CLEARED TO @ 


yeas 2 a al 


MFD ID BLOCK 


MFD Address (Link) of First Name Block | # ULNK 9 
-] 2 Dummy Entry (not to 
ae 4 be confused with 
| Oe 6ccCount [255,255]) 
~ Pack Cluster Size (1,2,4,8, or 16) 1g 
Clean Priv 0 12 Public/Priv.Pack Ind. 


Clean/Not Clean Ind. 


Tym Ye TT 


sp teetiinan - ae 


, Lach ay (2 wus iil RAUV OV) 14 
| Pack ID (2 wds in RAD 50) 16 


UFD ID BLOCK 


UFD Address of First NB g 
2 Dummy Name 
4 (Impossible) 
6 
File Directory Cluster Map 
File Directory Cluster Size 
Seg # of first segment in cluster 9 2 


of MFD 


One for 


each sector 


4 
6 
10 of directory 
12 whether MFD 
1 


eo FS 


MFD DEFINI' 


Link to next name, 0 is end of chain ULNK 0 
Project No. Programmer No. UNAM 2 
Password Rad 50 4 
| Password Rad 50 6 
11 UPROT Protection Status USTAT 10 
CURRENT ACCESS COUNT {UACNT 12 
ACCOUNT BLOCK LINK | UAA #14 
UFD Segment Start, 0 is no UFD UAR 16 
_MFD NAME BLOCK 
+1 if block in use, -2 if bad block _ ULNK 
Accum CPU Time for Account | MCPU 
4 bits Connect time for account MCON 
Accum Kilo Core Ticks MKCT 6 
_Accum Device Time MDVT 10 
CPU TIME 10 Bits 
6 bits KCT MLDGI 12— 
Total Segments Permitted ‘MDPER 14 
ts ie 
UFD Cluster Size | UCLUS 16 


eee SNe a AN EN RNR ee eh NN RN Or ma Rae na wt Mem ee RM am atm er ane 


MFD ACCOUNT BLOCK *Reset by Read Data Reset Accounting 


Protection Byte Bit Assignments (UPROT) UFD/MFD 


Bit 15 Privilege Bit, used to set JFSYS 
14 1 = Run only 
13 Write Protect from World 
12 Read Protect from World 
ll Write Protect from Group 
10 Read Protect from Group 
9 Write Protect from Self 
8 Read. Protect from Self 
Status Byte Bit Assignments (USTAT) UFD/MFG 
Bit 7 Marked for Delete if l 
6 File Entry if 0, MFD/UFD Entry if l 
5 Not to be Killed if 1 
4 Not to be Extended if l 
3 File Already Open for Update 
2 File Already Open for Write 
1 Must be Zero 
0 File is ‘Out of Sat' if 1 
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VED TABEL 
(ONE ONLY PER UFD) 


LINK TO FIRST NB IN UFD. (OR 9) 


UFD ACCOUNTING BIOCi. (AB) 
(ONE PER FILE CATALCGUED IN UFD) 


+1 iS SIGNAL THAT BIOCK IS IN USE) 
-2 IF BAD DISK BLOCK) 


LAST ACCESS DATE 


.NUMBER OF BLOCKS IN FILE 


CREATION DATE 


CREATION TIME 


( UNUSED ) 


CLUSTER FACTOR FOR THIS FILE 


UFD FILE DIRECTORY CLUSTER MAP (IDCM) 
(ONE PER BLOCK OF THE UFD) 


| FILE DIRECTORY CLUSTER SIZE | 


i PLOCK#OF FIRST BLOCK IN CLUSTER B, 
| OF_UFD | 
| 


aoe #OF FIRST BUOCK IN CLUSTER 1 
OF UF. 

BLOCK #OF FIRST BLOCK IN CLUSTER 2 | 
, OF UFD 


i 

Se 
"BLOCK OF FIRST BLOCK IN CLUSTER 3 | 
OF _UFD _ | 


BLOCK # OF FIRST BLOCK IN CLUSTER 4 | 


FUER) 
& aa 


BIOCK # OF FIRST BLOCK IN CLUSTLR 5 


FD 
| BLOCK #OF FIRST BLOCK IN CLUSTER 6 


OF _UFD 


CRETE LOMAT 


UFD NAME _RIOCK (NB) 
(ONE PFR FILE CATAIQGUED IN UFO) 


LINK TO NEXT NB IN UFD (OR # IF END) 
FILENAME (CHARS 1 - 2) BADSS 


Fi LENAME (CHARS 4 ~- 6) RADSS | 


EXTENSION RADS# 


STATUS 


PROTECTION CODE 


FILE ACCESS COUNT 


LINK TO AB FOR THIS FILE 


LINK TO FIRST RB FOR THIS FILE 
(OR # IF FILE IS OF § LENGTH) 


UFD RETRIEVAL BLOCK (RB) 
(AS MANY PER FILE AS LENGTH REQUIRES) 


INK TO NEXT RB FOR THIS FILE 
OR If LAST RB) 


BLOCK # OF FIRST BLOCK IN CLUSTER @ 
7,146,22 etc) OF FILE 
BLOCK # OF FIRST BLOCK IN CLUSTER 1 | 
(8,15,22 etc) OF FILE { 
BLOCK #OF FIRST BLOCK IN CLUSTER 2 | 
(9,16,23 etc) OF FILF 

BLOCK # OF FIRST BLOCK IN CLUSTER 3 
(19,17,24 ete) OF FILE 

BLOCK # OF FIRST BIOCK IN CLUSTER 4 | 
(11,15,25 etc) OF FILE 

BLOCK # OF FIRST BLOCK IN CLUSTER 5 
(12,19,26 ete) OF FITE 

BLOCK #OF FIRST BLOCK IN CLUSTER 6 
(13,28,27 etc) OF FILE 


UFD HOLE (HO UNUSED BLOCK) 


5-LB 


UFD LABEL 
(ONE ONLY PER UFD, AT 
CLUSTER @, SECTOR @, BLOCK @) 


LINK TO FIRST NB IN UFD 
(OR §) 
-1 


+4 

+6 

+18 

+12 
+14 

+16 

UFD AB - ACCOUNTING BLOCK 
(ONE PER FILE CATALOGUED IN UFD) 

ed a ee 
+6 CREATION DATE UDCc=6 
" a 
+16 UCLUS=16 


CLUSTER FACTOR FOR THIS FILE 


UFD FDCM - PILE DIRECTORY CLUSTER MAP 
(ONE FOR EACH SECTOR OF UFD) 


+8 FILE DIRECTORY CLUSTER SIZE 


+2 SEG. # OF FIRST SEG. IN 
CLUSTER § OF UFD 

+4 SEG. # OF FIRST SEG. IN 
CLUSTER 1 OF UFD 

+6 SEG. # OF FIRST SEG. IN 
CLUSTER 2 OF UFD 

+19 SEG. # OF FIRST SEG. IN 
CLUSTER 3 OF UFD 


+12 SEG. # OF FIRST SEG. IN 
CLUSTER 4 OF UFD 


ar SEG. # OF FIRST SEG. IN 
CLUSTER 5 OF UFD 


vie SEG. # OF FIRST SEG. IN 
be = CLUSTER 6 OF UFD 


UFD NB - NAME BLOCK 
{ONE PER PILE CATALOGUED IN UFD) 


LINK TO NEXT NB IN UFD 
(OR § IF END OF CHAIN) 


FILE NAME (PART 1) RAD5SS 


PILE NAME (PART 2) ‘RADS# 


+8 


+2 


+4 


+6 


+12 FILE ACCESS COUNT 
+14 LINK TO AB FOR THIS FILE 
#16 | LINK T0 FIRST RB FOR THIS FILE 
(OR § IF FILE IS OF # LENGTH) 
UFD RB - RETRIEVAL BLOCK 
(AS MANY PER FILE AS LENGTH 
OF FILE REQUIRES) 
+6 LINK TO NEXT RB FOR THIS 
FILE (OR § IF LAST RB) 
2 SEG. # OF FIRST SEG. IN 
CLUSTER # (7, 14, 21, ETC.) OF PILE 
44 SEG. # OF FIRST SEG. IN 
CLUSTER 1(8, 15, 22, ETC.) OF FILE 
+6 | SEG. # OF FIRST SEG. IN 
CLUSTER 2 (9, 16, 23, ETC.) OF FILE 
+g SEG. # OF FIRST SEG. IN 
CLUSTER 3 (1,17, 24, ETC.) OF FILE 
#12 SEG. # OF FIRST SEG. IN 
CLUSTER 4 (11,18, 25, ETC.) OF FILE 
+14 SEG. # OF FIRST SEG. IN 
CLUSTER 5 (12,19, 26, ETC.) OF FILE 
ue SEG. # OF FIRST SEG. IN 
CLUSTER 6 (13, 28, 27, ETC.) OP FILE 
HO - HOLE (UNUSED BLOCK) 
+2 
+2 
+4 
+6 
+19 
+12 
+14 
+16 


ULNK=9 


UNAM#=2 


USTAT=18 
UPROT#=11 


VACNT#12 


UAA=14 


VAR#=16 


ULNKeg 


UENT=2 


veu vee INL LUNS 


Link to Next Name Block,0 is End of Chadn 


iFilename 


etl: 


ename 


ee 


ves roe EEL seats Byte 
Retrieval Block Link,O is No 


UFD NAME BLOCK 


+1 if Dlock in Use,-2 if Bad Block 


of Last Access 


Segment Size 


of Creation . 
of Creation 


RTS Name Rad 50 
RTS Name Rad 50 


File Cluster Size 


UFD ACCOUNT BLOCK 


ink to Next Rib, 0 is End of Chain | 
Physical Segment # of Cluster 0 cae 
ae Segment # Of Cluster 1 Start | 


; 
H 
Tl Seg we en 


[Tt 0 then end “of list 


RIB 


Retrieval Information Block 


ar 
i‘ 
= 


UCLUS 16 


ULNK 0 


FORMAT OF LINK WORDS IN DISK DIRECTORIES 


PEEPEEPESEELLE 


i 
cae Se 


a 3) BLOCK(ETTE) BYTE-OFFSET WITHIN THE BLOCK. 


RANGE = g to 496, IN MULTIPLES OF 16,, 
eg. 9,16,32,48, etc. 


1) LOGICAL CLUSTER IN THE FILE. 
RANGE = @ to 6 
USED AS INDEX THROUGH FDCM. 

2) BLOCK OFFSET WITIIIN THE CLUSTER. 
RANGE = @ to (CLUSTER SIZE - 1) 


PROTECTION CODE AND STATUS FORMATS IN NAME BLOCKS OF DIRECTORIES 


PROTECTION STATUS 
CODE FORMAT FORMAT 


ef loieelsblel5|+[5)2|1[0 


1 «= FILES DATA SPACE IS PHYSICALLY ON ANOTHER DISK. 
(USED IN RV/RC DISK FOR FILES ON RC DISK) 

2 = MUST BE CLEARED TO @. 

4 = FILE ALREADY OPEN FOR WRITE. 

19, = FILE ALREADY OPEN FOR UPDATE. 

29, FILE NOT T0 BE EXTENDED. 

49," FILE NOT TO BE KILLED. 

199= MFD / USD - IF THIS BIT IS CLEAR, IT IS JUST A 


PROGRAM or DATA FILE. 
20% FILE MARKED FOR DELETION. 


~ 
a 


READ PROTECTED AGAINST OWNER. 


N 
ft 


WRITE PROTECTED AGAINST OWNER. 


READ PROTECTED AGAINST GROUP. 


& 
a 


WRITE PROTECTED AGAINST GROUP. 


fee) 
ff 


16.= READ PROTECTED AGAINST WORLD. 


32." WRITE PROTECTED AGAINST WORLD. 


126% PRIVILEGED PROGRAM STATUS FOR .BAC FILE. 


Protection Code Status Word 


ae ee 
(15 |14 /13 |12 }12 |10'9|/8 ;7;6,5/4/3;2]1 48 
| pcan Cornet nes seen cea CEL EE emeneP sree Pemcenseed Snr ome ears Re AEE! Gee ame ese : 


4 t 
ee on Coreen - 


STATUS WORD 


BIT 

g lg Files data space is physically on another disk 
1 g Must be zero | 

2 4. File open for write 

3 1fg File open for read' 

4 20, File may not be extended 

5 4B File may not be killed 

6 128g MFD/UFD = 1; program or data = g 

7 228. File marked for deletion 


PROTECTION CODE 


8 Ll Read oretect against cwner 

9 2 Write protect against owner 
10 4 Read protect against group 
ll 8 Write protect against group 
12 1619 Read protect against world 

13 3210 Write protect against world 
14 6419 BAC file 

15 12816 BAC Program is privileced 


3) 


1) 


2) 


Blockette byte-offset within 
sector | | 
Range @ to 496), in multiples 
of 16409 


Logical cluster number in the 
file 
Range @ to 6 


Sector offset within the clust 
Range @ to clustersize - l 
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PACK STATUS AND OPEN COUNT FOR UNTCNT 


15 14 13 l2 ll 10 9 8 7 6 ; 5 4 3 
= Secpea ano Ge Auer Ge "OPEN" les ona 
disk file unit. (This must be @ before 


the system will allow a file unit to be 
dismounted.) 


= 1 non file structured 


yhen this bit is cleared to @, the 
file unit is unlocked. When this 

bit is set to 1, the file unit is 
locked. When locked, no file 

opening is permitted. 

(When a pack is first mounted, it is 

i automatically in locked status; it can 
: also be locked by the System Manager 
in preparation for dismounting.) 


ENA De MEE ie i Ba hls ase ama ee 


-is public. When this bit is set to 1, the. 


i 
When this bit is cleared to @, the file unit 
file unit is private. 


—When @ pack is mounted. 


Notes on DECtape processing 


1) DECtape file handling. 
A DECtape request to the File Processor causes the 
following actions: 
a) Parameters are set in the DECtape DDB. 
b) The DDB is linked into the DECtape Symbiont queue (DTSQ) 
c) If the symbiont had been inactive, the QDTSYM bit 
is set in L3QUE. | 
q dad) An exit is made from the File Processor. 
Sooner or later the L3QUE mechanism (extended priority 
arbitration) will start the DECtape Symbiont. 
The Symbiont will obtain needed buffers (directory 
information on BUFF.SYS). 
The Symbiont will place the request in the DECtape 
driver queue (DTDRQ). | 
The DECtape driver will initiate the transfer. 
When I/O is complete, the driver causes DTSRET to be 
run a level 3. 
If there are errors, these are passed to the FIP 
function DTSERR. 
If there are no errors, the FIRQB is re-inserted into 
the FIP queue, and FIPSYS is entered. 
If other requests are in the symbiont queue, DTSRET 
sets the QDTSYM bit in L3QUE, causing the Symbiont 


to be rerun as soon as possible. 


Notes on DECtape processing (cont'd) 


2) DECtape directory handling. 

The DECtape UFD (blocks 192,193) and Permanent Bit Map 
(block 184) are copied onto disk when first 
required (into BUFF.SYS). 

The disk sector number (in BUFF.SYS) assigned to 
a given DECtape drive for holding its directory 
blocks is stored in that drive's DDB+26 (DTDSK§ word). 

Byte 1 (DTDSTS) of a DECtape DDB indicates the status 
of that directory on the disk. 

Bit 15 (DTDSK) is set when the directory on the disk 
represents that of the currently mounted DECtape. 
Bits 14,13,12 are set respectively when the UFD 
no.l, UFD no.2, or PBM have been altered on the 
disk and therefore need to be written back onto 
the DECtape in their updated form. 
The directory blocks are written back onto the 
DECtape at the time of a delete, a renaming, or 
a CLOSE. If there is an open output file, the 
directory re-writing is delayed until the CLOSE. 
Bit 15 is cleared whenever the Init count (DDB+36) 


of files opened minus files closed becomes zero. 


3) Cautions for users. 
Users can avoid unnecessary repeated re-reads of the 
DECtape directories by keeping at least one 
DECtape file open in the program until the program 
has completed all its DECtape processing. 


When a user mounts a DECtape on a drive, he should not 


oS - 32. 


Notes on DECtape processing (cont'd) 


assume that the last person who used that drive.-..- 
under his account closed the last file. It is 
safer to force the system to read in the DECtape 
directory afresh by the command CATALOG DTn:. 


(writes Directory on BUFF.SYS) 


A- 3H 


DOS/RSTS DECtape Comaptibility 


Problems: 


An improperly closed DOS generated DECtape file (usage and/or 


lock bits non-zero) will print with an invalid protection 


when cataloged under RSTS. 


Restrictions: 


1) 


2) 


3) 


1) 


2) 


RSTS will not allow processing (OPEN, CREATE, or DELETE) 
of contiguous DECtape files. | 

In processing (INPUT) DOS generated linked DECtape files, 
RSTS will ignore the "partial block" indications. 

A RSTS generated (always linked) DECtape file cannot be 


appended to or extended under DOS. 


This means that formatted ASCII linked DECtape files 
(properly closed) are still 199% compatible in the 
following sense: 

If I write it under DOS, when I read it under RSTS I 
get the same data. 

If I write it under RSTS, when I read it under bos I 


get the same data. 
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6 (UNUSED) A DECtape has 576,, (=1194,) blocks of 256,, words each (=1000, byte 
1 


The first word in every block of a linked file is a pointer to 
LINKED FILES the next logical block of that file. . 
(the pointer contains the physical block # of the next logical 
block; it is positive for forward tape motion and negative for 
backward tape motion.) , 


LINKED FILES 


The remaining 255,. words are data. 
DECtape directory structure can catalog and map a max of 56,, file: 


Each File Bit 


FILE BIT MAP (36,WORDS) FILE 22 | tap has 36,9 word: 
(=576,, bits) 


FILE BIT MAPS FOR FILES 8-14 Pee 


FILE BIT MAP (36, WORDS) FILE 23 


72] rine BIT MAPS FOR FILES 15-21] | ger Each bit maps 1 
FILE BIT MAP (36,WORDS) FILE 24 | block of the 
73| FILE BIT MAPS FOR FILES 22-28 DECtape. ‘A set 


i FILE BIT MAP (36, WORDS) FILE 25 bit means an 


#4| FILE BIT MAPS FOR FILES 29-35| ~s 256, allocated block; 
re words FILE BIT MAP (36, ORDS) FILF 26 a clear bit meant 
75| FILE BIT MAPS FOR FILES 36-42) TS, . a free block.) 
ig | FILE BIT MAP (36,,WORDS) FILE 77 
,%6| YILE BIT MAPS FOR FILES 43-49 .. Each File Bit May 


FILE BIT MAP (36,ORDS) FILE 28 | Taps the entire 
DECtape. 


_¥] PILE BIT MArS TOR PILES 52-56 


(4 WORDS UNUSED) 


449) arp Block #1 


464 lst word: 141, (link to MFD block #2) 
2nd word: 4 (interleave factor) . 
A¢2| urp BLOCK #1 j Srds_) 3rd word: 174, (pointer to }st Master Bit Map) 
——— 4th word: 194. (pointer to non-existant 2nd 


Master Bit Map) 


43) UFD SiocK #2 
252 words unused 


*| MASTER/PERMANENT BIT MAP 


tn cetaceans lst word: @ (link to non7zex 
5) SS i 
256,, | up to 6315 4-word entries} | jointer to UFD 
ord each with format shown start block 
LINKED FILES . 
remainder unused. 
: ist word: 193. (link to next UFD-block) or @ 
(end of chain) 
MED BLOCK #2 
RSTS does not rezd or check 28, file entries FILENAME (PART 1) RADS? 
DECtape UIC's. (max) 
When zeroing a DECtare RS7TS 9 words each FILENAME (PART 2) RAD5® 
enters a UIC of [1,2]. with this 
format: EXTENSION PADS 
YPD_BILOCKS 
RSTS ignor2s - LOCK Bits, USAGE COUNT, 
and END BLOCK entries in the UFD. 256,, 
RSTS checks the "TYFE" bit (bit 15) words 
and will not allow a “CONTIGUOUS" file fp; 
¥*File Type START BLOCK 4 


to be OPENed. 

When creating a LECtape file, RSTS writes 
a protection code of 233, (for DOS-l1l 
compatibility). But RSTS docs not read 
or check DECtape protection codes. 


LENGTH 


END BLOCK ft 
3 worés unused CODE 


4 ys : : 
256, vord header 
ore 3C,, word bit map of entire DECtape (a logical 


(ORing of all Pile Bit Maps) 


RSTS S.W.S. Notes 


‘Update accessing of disk files. 

If a user attempts to open a file in update mode and 
that file has already been opened by someone else in 
normal mode, the system issues a "protection violation" 
messége. Otherwise the system proceeds to the next step. 

The system then determines the user's read and write privi- 
leges from the user's account number and the file's 
protection code. 

If the job is running in privileged status (as described 
above), then its privileges are extended to read-&- 
write. 


If the job has, as a result of the preceding, both read and 


7 te: - 5 Pe a oF Se ete Sees 
ee ee BVive.coocs,; 20 325 GisGwsa to pruceéu; Eise a . 


"protection violation" message is issued. 


[) Miscellaneous Note>3. 


.) Basic file structures are imposed 


an disks through DSKINT. 


2) UFDs are created only when needed. 


There is a distinct interrupt handler for each type of disk 

A maximum of 5 retries are attempted when a disk error is reported. 
If the error persists after the fourth retry, the operation is 
aborted with an error flag for the caller. 

All five errors are logged. All disk I/O routines are core-resident 
(but not all File Processor routines). FIP routines are optionally 
resident. 


RP and RK disk driver code optimizes "seeks". 


Distance which arm travels in "seek" is minimized by picking the 
next operation to be performed on the basis of the cur- 
rent position of the arm. 

Simultaneously a fairness-count is kept for each waiting opera- 
tion lest it wait in the queue indefinitely. 

Thus the selection of the next operation is made on a twofold 
basis: (a) closeness of the operation to the arm's cur- 
rent position and (b) time in the queue. 


BADB.SYS created at DSKINTIME, catalogs all known bad disk sectors. 


The system will read this file and mark those sectors in the SAT 
as allocated. 
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CIL MAP 
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RSTS.CIL DESCRIPTION 


BLK #0 CIL DIRECTORY 
READ ONLY 
BLK #1 DEFAULT PARAMETERS 
R/W 
BLK #2 STARTUP PARAMETERS Used by Auto Restar: 
R/W > a ere 
BLK #3 INIT 
READ ONLY . 


KERNEL MONITOR 
READ ONLY 


OVERLAY CODE 
: READ ONLY 


ERROR MESSAGES 
READ ONLY 


BASIC 
READ ONLY 

ODT _ | 
READ ONLY 


| ROLLIN | 
READ ONLY 


DIAGNOSTIC a 
| READ ONLY 


"Startup Parameters" are in effect for this run only. 


"Default Parameters' are established by the Default establishment 
in reply to the Default option. 


Startup Parameters may or may not be the same as Default. 


6S 


CIL INDEX 


i CIL LINE | 


i 


SYSTEM DISK 


A 


* optional 
** in-house only 
*** formatted binary 


ae CIL LINE 
~6 g wae 1 ane 
~4 BYTE COUNT ae 
-2 BLOCK LOAD POINT : 
+s [ig bots Frou] > a aoa 
+2 TIME OF DAY WHEN CIL WAS LAST MODIFIED! 
’ 
+6 JULIAN DATE WHEN CIL WAS LAST MODIFIED 
+18 | LOGICAL BLOCK SIZE OF CIL IN BYTES PER BLOCK 
ae, # OF CORE~IMAGES IN CIL ot 
+14 # OF BYTES REQUIRED FOR CIL INDEX rTsELF | 
ALLOCATED FOR CIL 
+2 |* OF LOGICAL CONTIG. DISK BLOCKS REQUIRED BY CT 
@ BLOCK-SIZE SPECIFIED AT +10 WORD 
# OF LOGICAL CONTIG. DISK BLOCKS REQUIRED BY CIL 
+22 @ 64,9 WORDS/BLOCK 
+24 |* OF LOGICAL CONTIG. DISK BLOCKS REQUIRED BY CIL 
@ 25619 WORDS/BLOCK 
— CIL cup 
~6 
~4 
-2 BLOCK LOAD POINT 
“ 
+4 # OF BYTES IN CORE-IMAGE PROGRAM 
i. ere 
+16 (ODT TRANSFER ADDRESS) 
+12 PIRST LOGICAL BLOCK OF CORE-IMAGE PROGRAM 
+14 PROGRAM NAME (PART 1 - RAD5#) 
+16 PROGRAM NAME (PART 2 - RADS#) 
+22 : IDENT VERSION IDENTIFIER (PART 2 - RADS$) 
+24 | TIME OF DAY WHEN MODULE WAS LINKED (PART 1) 
+36 DATE WHEN MODULE WAS LINKED 
+32 


DIAGRAWS 


DIGITAL EQUIPMENT CORPORATION 


System Evemenr 
C 908/@are H) 


1. Ceeation oF | A | 


2. SYSLop | 
Buico CiIL on Desk 
FRoM LCL on TAPE 


3. OPNN: DSKINT 
CREATE Minsmum RSTS 
Fire Sreucrure 


4, OPTION: REFRESH 
REATE AND Position 
System Fives 


5. OPrion : DEFAULT 
| Estnasuse Derauct Sraet 
UP PARAMETERS 


6. OPTION: START 
1. Burd Sysren Ligeary 
8. Creare User Accets. 


DisTRiBUTION | 


“TAPES 


LCL 


— G\k on 
Syste Disic 


Cit 
O,1 ae Fices 


ti eeney Acer 


Aut d, Rare 
PLUS THE ABove 


Rervecten in CIL 


Ligeary Tates 


MEMORY MAPPING —, RSTS-E. 


| USER. ‘ 
JOB #1 PHYSICAL . KERNEL 
(virtual) MEMORY virtual 
7 g 


USER 
virtual 


yo 4e. 


Cee ° 
ogee? 


EXISTENT 


“x 


WOT MAPPED 


THIS SPAC 


3] AVAILABLE BUT 
ca 
1] 


NOT SWAPPED . ~ 1000 


MEMORY ORGANIZATION 


PHYSICAL 


MEMORY SPACE 
od = | eee ee Ie 


1/0 PAGE | 
24K aes 7 USER 
VIRTUAL SPACE 


KERNEL 


VIRTUAL SPAC 
32K 


NON-EXISTANT | 32K 
MEMORY 


1/0 PAGE 


BASIC+ 


KERNEL 
PAR#+S 


XD MAPPING 
GC, 
BASIC+ 
RUN 
TIME 
SYSTEM 
USER 
PROGRAM 


MONITOR 


2A RR A pom ty Pweiws me eee ed 


OPERATION OF THE SCHEDULER 


SCHED. BRINGN 
NEXT? ROOM TO 
YES Nr | BRING JOB IN? 
rail Se YES 
MAIN SCHEDULE : 
KICK ANYONE SWAP 
SET NEXT OUT? IN 
RESIDENT? 7 (ONLY KICK OUT JOB 
JOBS WITH : 
, SOS SYOUNT = 23 . 
YES BRINGN — - y 
' | . SET 
SUB-SCHEDULE SVOUNE 
SWAP SET C EQUAL TO 
WHAT IT COST 
our Bit TO BRING 
RESJOB ‘ 4 HIM IN 
RTS | 


SQVUNT = (QMUL*SIZE) + 
QADD 
RESJOB 

START UP A RESIDENT JOB 
IF: 1) TIMED OUT [BURST EXHAUSTED] 

2) DISK STALL 

3) FIP STALL 

THEN: SVQUNT « (SVQUNT)-(# TICKS RUN THIS RUN) 

IF SVQUNT<@# THEN SVQUNT = @ 
IF STALL WAS NOT DISK OR FIP THEN SVQUNT = go 
"SVQUNT" IS THE GUARANTEED RESIDENCY 
QUANTAM (RUN BEFORE SWAPPED) IF COMPUTE BOUND. 


SVQUNT = (QMUL * SIZE) + QADD 
[2] « DEFAULT SETTINGS > [4] 


\) 
j 
\ 


INTERRUPT HANDLING 


USER 
RUNNING 
current mode= 


I/O Interrupt 


: 


I/O SERVICE 
cur. mode=Kernpl 


Prev. mode =? 
Priority=4-7 


pith Sn ae acai 


Reeroute 
Interrupt 
To User 


"REIS" 
are there any 


, : "L30UE " 


TASKS TO 


RUN 
re i eee eee eae 


Service 


currents#sKernel 
Prev. = User 
PRI = 3 


| I/O INTERRUPT weer 


ae 


- 
a ae | 
iRrray™ | ! 
_was PREV : 
PRIORITY | | 
| > 3 3 
| 


ur. node=Kerhe 
rev. A mas 


"FIP" (FILE PROCESSOR) OPERATION 


"SAVJOB" ; SAVE USER JOB 


ENTER INTO 
se FIQUE at 


FIRST 
IN OURFURE 
: ; 


IMP "RTI3" 


YES 


REQUEST 
PROCESSING 


OVERLAY NEEDED? 
Q I/O (DISK)? 


—— ae ee ee ee ee ee ee eee oe 


SET 
"JBSTAT" 
BITS 


YES MORE FIP 
OPERATIONS? 


JMP RTI3 


"FIPRET" ; 


QUEUED FIP 
OPERATION 
COMPLETE 


et end 


JOB STRUCTURE 


DIGITAL EQUIPMENT CORPORATION 


USER JOB IMAGE . PDA Format 


| R6 Stack | free header space 
(256) 4 words) 


Editor Flags, FIRQB with 
| programmer name, Core 

Common String, and inter- 
rupt stack data are 
stored here 


occupied header space 


Rl Stack 

Data Items, arithmetic / 
arguments, & interpre- 
tative subroutine 
return-addresses are / 
stored here. 


/ 
| permanent header space 
(Program 
Data aoa 
Area) —SPDA points here ———————> +f allow 
. BAC +2 | ptr to end of perm.str.sp. to 
file +4 [ptr to end perm. hdr. space; ctrl 
Impure Data Area +6 | ptr to end of occ. str. spc; ptrs 
(variables, arrays, +16 | ptr to end occ. hdr space (ptr 
etc.) +12 | ptr to end free string sp. "slid 
‘ee 
See ee ae ee ee, permanent string space dary) 
\ 
\ 
(BASIC's system vari- 
\ . ables are stored here.) 
<—SPTA points here. \ 
~ \ occupied string space ( 
Compiled interpretative \ | | 
code. (A “pure" (User program's vari- 
area; never modifies \ ables and constants are | 
itself.) | kept here.) 
ee \ | 
\ Free string space 
higher 


OFwW aw! oNWet 2 odds Ww ee wane 


in a es 


OGgnNHOU+t OAH i 


| 

Ww 
PAAOHBZAH . | 
i 


nn Tk 


rd QQ 
3 


LA 
LExica: 
nal 


ee etthetnaiehtiaiateaiialiia’ 


i 
{ 
i 
{ 
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i 
| 
i 
I 
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* 
SC AAR lata SOA 2 


RC 
RC 3 EC 
sc, 50 | 


PT, 


{N° NH I 


TE ETT RE ME, 


wine gece ee ee 


Opracnal 


@JOBHE*2 


POINTER 


DDB/FCB 


DEVICE DATA BLOCK 
OR 
FILE CONTROL BLOCK 


JOBWRK 


ARROWS INDICATE POINTERS 


JOB DATA BLOCK #1 


JDIOB 


JDFLG 


J DWORK 


JDRTS 


JOB'S WORK BLOCK 


USER's DEFINED 
FIRQB OR XRB ARE 
MOVED FROM HIS © 
USER CORE IMAGE 
TO WORK BLOCK 


RTS 


RUN-TIME 
SYSTEM 

DESCRIPTION 
BLOCK 


JOBDA 


JOBF 
LOSTS 


Le aS oe, CR RE TRIN RCNRR ENN UN oP 


eee NR 6 pene ete et IOGEAR RAIDS EER NEC I ARENA A, a 


CORE KAP 


DIGITAL EQUIPMENT CORPORATION 


ADDR IDENT CONTENTS | 


_BR_JMPTOS 
PST ime Out) | 


(Illegal & 
9 


PR7 


—_—_ POWERF -—Eonene __(Pak fag) Fajl) | 


2 i |) eee 


ee EMT BP (EMT) 
-F i ees 


3 
(ee Eat i ee 
[40 aetonb: | “ane @ es 
a SS A 7 A 
| 44 
46 
50 eae ae BR_RELOAD 
52 | sd BR XCRASH 
54 me ee 
= | ~”~*é<dR BR RELOAD~s~=“‘“*~*~™* 


| tsi‘ TE INT Addr 
Se aaa Ren SE eee 
a TTO INT Addr 


HO! SORE SE aa 
a aS Sc eee 


i es aca CLOK (KW11-L) 
it) eee CREE eRe een Oh: , renee eee ney 
CC ee eee SS 5) See 


a me 


Monitor Core Map l 


ADDR ‘IDENT | CONTENTS 


TL114 Parity | | 
R7 pee rare eee mem 
. ee | _ | = an otebe Sie cage oael 


em 
jo 
fs 
tg i hy 


ETeTeTETE) ey ey epee 
OV WO oO OB) By Bp 
OV B] ro] O] OF A NOLO 

z| 


! 


par) 
fo>) 
Le) 


| 
| 


4 
are moe ame bane Catena 


164 
166, 


1 
: : j | 
fd Seek Stet me 


ADDR IDENT CONTENTS 

0 . (RK1L 
ic ar (eames) RNa au Tne pee NT nore eee) 
Pag [ey 
230 | sd ; 
cy eee | 
334 [| _WRKCTL (Pointer to Stats Pointer) | 
oaa_ || MONFIN (Floating Point Error) | 
ager eR et 
mo50 1 LUFRE 250 __—s(Segmentation) 
Ss Sa, RRs | © ne pe ree 
Sag ca INT CI 
(260 | 
| 262 [| i 
364 | XCRASH |_UMP__-XXCRAS 
Coe eee ee 
272 aigaeianees ESTAR aaa CCE i enn 
Sac Raa Se ee 
eee 
300-1 Ltt of floating vectors) | 
pom 
B17 CSI (Nand nese 
Ha ice (nn Ce 
ie i nee (ean aR eene 
i) ee aren ee ene 
FE Cah aang (am a CNR nS One 
Tg er 
Sa ee ee 
7 | 


Monitor Core Map 3 


| 300 
| 30 

| 306 
310 


APO Hae a ane em at nt 


TTIINT (lst De 11) 
PR 5 + unit # _ 
TTOINT (lst Bc 11) 


etc. for remaining DC ll'‘s 


| 
| 


Stee Aree ARE ON TES. SPN OPEN ENE 


TTINT (lst DI. 11-A) 

PR4 + unit = 
TTOINT (1St Du 11—A) 
PR 4 + unit # 


etc. for remaining D211-A's 


etc. for DLI1-E's (PR5) 


PRS + unit # 7 | 


DHINT 
PR5 + unit # 


etc. for DH ll's 


ARAN RR SN 
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(See Reliabiiity and Tass Manual) 


Rug 


ADDR IDENT CONTENTS 


Ss al Form 
TIME: 
[3008 [rinses rinete 
aD ADR. on ee es Bd 


1012 SOBF: 


[1014 | iosts: | J 


ORWRK 


POTS] 
1020 
1022 | JOBONT: re 


| 1024 | PARTBL 16 Possible Parity 
CSR Addresses 


6 
. a 


1066 16 Possible Ranges 
1070 of CSR Addresses 


Monitor Core Map 5 


& 


DR IDENT CONTENTS 


1110 
1112 
114 
1116 
120 
1122 
1124 
11126 | 
M130 | PARZER 
(Lis2 PARMIN 
PARDSP | Exit Dispatch Address 
PARB:D | eo oe j 


‘Non- Error Parity gsr Sample 


TR eee ee Te I hee ATR. Mme een TO 
GBLAEVL Failvey won DD CALL ob 


ig 


ES ERS OE A ES PEE ALSTON ITE ET I IIT SCF 8 ea EST 
t = Smmasiainee i alien itmenamnadteame ante theikceee id 
€ 


FTL 114 Parity Error Code 
Bad Log is checked to see if soft error ; 
also user/kernel mode | 

Check - parity error in kernel mode “ 


1152 


| 
| 
ie i 


atal 


ey ie 
ed Led Coed Lee (nel vel Lee fad Ua 
np of Cn BES LP S| Go | o 
BELO] ALA] mlopaLs 


RNR EO 2 


1 
re 
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PARIBA | Scr 
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7-b 


ee IDENT CONTENTS 


aa System Stack Area 
ares 


3 


Dectape DDB's 


['ZZZDDB 


a 


STSDFT 1 Default Runtime System Description} 
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Start of Small Buffer Poo 


mr 
Kei 
tg 

| lw 


Start of Big.Buffer Poo | 
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ADDR IDENT CONTENTS 


(FIBUF =| ~=Directory Buffer 
| Eee Bes ee | 
| ‘[EIBENT | Map Entries Start 


! : — FCLOFFE 
| SATBUF | SAT Buffer a — 

: hee SRT 

PSO TEE 

— Job Data Adr’ | 


Job 1/0 Wait Condition _ a 
en | penne ee 
( | JOBCLA | gob Timer Table 
DEVOLE—] Hung Device Timing 

aa 
emt 
rsvount | d0B’s Saved Quantum 


DONE f Pointer to Start of Disk Done Queue 


t 


mmr 


RF11/RC11 Disk Queue Start » OSH 


| DSKOUF __| 
|DSKQDK RRLiL DiSK Queue Star 


SS ees Ser 


DSKOQDP | RPII Disk Queue Start D> OF G 
fi bev Sf eis 
1 ERE 


| | SATPTR f One per Disk Unit. Points to \ 
; where in the devices SAT to start 


i. | looking for free blocks. 


Moniter Core Map ¥ 


| 


ADDR IDENT © CONTENTS 


SATSIZ SAT BYTE Size List 


@- 
a 
: 


Cluster Size List 


ny 
»n 
a | 
‘a 
Pe | 
f 


SAT Starting Segment Lists 


SS 
( I 


Counts of Free Sectors in SAT Lists 


Counts o Free Sectors in SAT Lists 


33 
4 
Q 
ty 
“ a 


Device Doné Table 


C_) 
! 
F 7 
s: 


oO 
B 2 


cy 

di 
Gj 63 
<1< < 


~ CLURAT. Table of cluster Ratios Pack/Device 


Pack status and Open Coun 
PUT, Mounted, NFS, locked 


4 


Points to slots in UNTCNT or 


DEVIBL appropriate to each device 


: 
a 
2 


OIN 
BINS 
g <ai< 


3IS1S 
BIG|S 


»Onitor Core hap LO 


hes 


ADDR IDENT CONTENTS 


Proysain Name Tabic 


TTYCTL 


ee [i SDGCEADE ee code el 


te 


NCTL Monitor 


ee ae 


File Processor 


a) 
Q 
Hy 
tC 


R CTL Card Reader 


ee : 
-——— ppeesT? [RP Dirty Area 
a 
[| KCI 


li. 


Monitor Core Map }] 


*See§f.1 andt{.2. } 
: G_/O 


» 


Panne z.ScIP_ | 2780 SCIP 


[ zUsER | 2760 User 


Job Stat Ptr 


a ee 
EEE 
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MONITOR ROUTINE NARRATEON 


DIGITAL EQUIPMENT CORPORATION 


“he system's Small Buffers are each 16.4 words in length. 

The system's Small buffers are used for storing job and 1/0 parameters 
and as 1/0 data-transfer buffers for character-oriented 
devices. 

Every active job uses two Jmall Buffers: one as Job Data Block 
and the other as Job 1/0 Block. . 

When active, each KB, the PR, and the PP should best have 5-6 
Small buffers each, and the LP should have 19 Small 
Buffers. These serve as data-transfer buffers. 

(Note -- The Ck 1s record-oriented and has its own permanent 

Input buffer at CDKBUF. DT is file-oriented and uses a 
Big system Buffer for its 1/o. MagTape and disk use no 
intermediate buffers but transfer directly into/from the 
user's job area.) 

Every open disk or DT file requires one Small 4uffer as FCB (Pile 
Control Block). 

Every File-Processor request uses a Small Buffer for the FIRQB 
(File Request Queue Block). 

Svery disk-transfer request (except those made by the File Processor 
and the Swap manager) uses a Small suffer for the Disk 
Parameter slock. 

when estimating the number of Small Buffers which a system should be con- 
figured to have, the totals derived from the above facts 
should be moderated by the consideration that not all jobs 
will be active at the same time nor will all devices and 
files be open at the same time. 


The system's Small buffer pool begins at FRESML. | 
when free (not in use), the Small Buffers ure linked together in a queue. 
| The origin of the queue (i.e. pointer to the first free 
Small Buffer in the chain) is at FREES 


At initialization (before any buffer is in use) queue looks like this: 


FREES ee aes 


(free) (free) 


“eading and writing is done by Monitor Code. The part of the 
“ser space with I/O Buffer is mapped into Monitor by using 
scratch R6 of PARS 7 L£ disk o& MKErhaiT ~ 
pee fel umainn neeraneee a y 7 wee 
No device can own more than 25% of the system's small buffers. 
3* Jess than 20% of the system's small buffers are left, they 
can't user more than a particular device's quota. 
i.“0 Drivers us Monitor subroutines to get data. (¢mucuve ter YD 
Disk and MAGtape is direct from/to user area. 

3 | 
DECtape I/O to Monitor and from Monitor to Userdvia Big Buffers. 


IO stall occurs when small buffer limit is reached ee 
DI/O REDO alse when disk ther cont be fransdered 


User Buffer I/O area in user image is as large as the user can 
make it. Atay Ya. . 


R6 of KISAR is used as scratch register and is used to map 
user space I/O Buffer Area into Monitor Space for DT & LP 


Lacution #. BYTE count in XRB are used by Monitor to set up 


ry 


aff I/O Traes KES | 


XRKB'S ace alge asel Lor FAT 's 


kK | ry NS Awe, 


“wee fe, ise che ee ~ delet: a Pile y 
£ ’ 


DIGITAL EQUIPMENT GCOPFORATION 


Pa 


ham om wets, 


of 


3 Levels of main scheduling 


To reflect 1 Interactive Jobs 
z2 #Cc 
3 Sysfunction to increase quantun for this swap. 


So the Job Table is scanned 2 times before running NULL JOB 
Also have 4 possible swap files which it set up correctly will 
keep most active jobs on fastest swapping device. The slots 


in the swap files are fixed to swap MAX size each. 


Highest priority jobs get lowest swap slot numbers which are 
allocated to fastest swapping device. 


There are 4 swap files & swap MAP in core for each File because 
the RSO4 is a UNIT addressable device. 


DIGITAL EQUIPMENT CORPORATION 


f O32 


SWS NOTES 


. RSTS/E 
SCHEDULER INFORMATION 
1006 JOB Low Core Area Current running job (locked) 
1007 NEXT Low Core Area Job to run A.S.A.P. 

SUBJOB Job who was sub-scheduled and 
running because he is in core 
and runnable and the job that 
really should be running is 
being brought in to core. 

NXTRES Job to be made resident next. 

JOBPTR Monitor Con- Is Round-Robin pointer to 

trol Area job number(s) in job table 
CORPTR Monitor Con- Is Round-Robin core table sub- 
trol Area schedule pointer (next spot to 
sub-schedule) 

CORFOR Monitor Con- Is Round-Robin core table force 

trol Area pointer used to determine who 


should be forced out of core to 
make room for a job that needs 
residence. (Job number for 
Force Out) 


SCHEDULING CRITERIA 


1) Must be runnable. 
2) Highest priority. 


3) Highest quantum (runnable time period) 


JO 


1 Overview of Monitor Functions 
wv Sev lew OF Monitor Functions 


The RSTS/E monitor performs the following range of functions:- 


: It manages timeshared jobs by means of a round-robin scheduler 
which selects runnable jobs in order of priority. 


‘ It manages the memory required by Swapping jobs in and out of 
Main storage. ‘Hole’ selection for a job is on a best fit basis. 


. It performs I/O and other service functions for timesharing jobs. 
The interface is by means of EMTs, XRBs and FIROBs (Transfer 
Control Blocks, File Request Queue Blocks) 


- It performs memory mapping functions for communications and 
transfers between modes 


é It dispatches I/O requests from the user, using buffers to enable 
flexible control of tasks not actually involved in data transfers 


F Users can handle their own traps. RSTS/E fully supports that 
facility by resuming the job at an address specified in the job 
image at known virtual addresses. 


It will run impure or pure code jobs 
. It acts as a communications and scheduling system between the 
following:- 


. USER/Device handlers 

- Device handlers/RSTS MONXTOR 
- RSTS MONITOR/USER 

- User/file management software 


. It handles I/O errors at device levels and supports a log for 
such errors. 


The modules described in this section form the basis of these functions 
and define the essential mechanisms for RSTS/E. 
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2.5 User/Monitor Interface 


This section covers the parameter and data passing interface 
bztween a user job and the monitor. There are two main devices: 
Transfer Control Block (XRB) 

XRB is used by the user to initiate an I/O Request and for 

Monitor/User data requests. 
File Request Queue Block (FIRQB) 

Each block is 40, bytes long (small buffer). The FIRQB holds 
f ‘nctions in slot FQFUN. A subset of these functions is available 
to the RSTS/E user, and the rest weer aged by the monitor itself. 
When a FIRQB is set up, EMT CALFIP (EMT @) is issued which is 
dispatched to FIB. FQFUN then defines the function to be performed 
either by resident or overlaid code. Only relevant parameters are 


needed. 
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9.6 T.301 (TntraeMAnitnr Grhadnlina Flace) 


This word is checked before a return is made from the monitor to 
the user. Also device handlers and high priority functions 

(levels 4-7) return to the monitor (RTI47) where L3QUE bits are 
checked before returning to the user. If a bit is set in L3QUE 
a corresponding entry in the table of handlers (L3QTBL) is used 


for dispatch to the appropriate level 3 (monitor) routine. 
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"L3Q" LEVEL THREE QUEUE TASKS 


QTIMER once per second - check for 
Hung TTY's 


Sleeping JOBS 
Exhausted "KB" waits 
Hung Devices 
QFIP "FIP" I/O Completions 
i.e. continue in "FIP" 
QSWAP SWAP Completion 


i.e. update CORTBL "SWPRET" 


QFILE Disk I/O Service Completion 
QDTSYM 

QDDCON DECTAPE 

QDACON 

QUECDR Card Done "CR:" 

QBUFSM Small Buffer ALERTER sets "JSNUL" 


;small buffers are now available 


QMTADN 

MAGTAPE 
QMTACN 
‘QSCHED Scheduler 
QBRING Bring JOB INTO Memory 
QFORCE Force a JOB out of Memory 
QBUF Big Buffer Available 
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2.7 EMTs, Their Identifiers and Dispatch Table 


EMTs are used in order to enter the monitor from a user job to effect 


the same functions normally handled by the monitor. 


“See the list of EMTs and the EMT dispatch table 
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2.8 TRAPS and Their Identifiers 


Synchronous traps (in this case TRAP (194489) plus low-byte code) 
4re ‘ispatched back to the handler in the RTS defined by P.TRAP. 
‘he handler in the monitor is TRAP##f which simply returns to RTS 


at the address in P.TRAP. 
Many of the traps are used by BASIC-PLUS for error handling. 


Tr location of TRAP@@ is in Loc 34. P.TRAP is maintained in the 


Pure Code Area Critical Pointers table. 
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2.9 Buffer Requests (IOTs) 


An IOT (999094) is used to get and return, big (256. word) and 
small (16. word) buffers from and to the appropriate buffer pools. 


The parameters are passed immediately following the IOT. 
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2.18 The Monitor Control Area 


Apart from the low core variables, the monitor requires many data 
e-ails and pointers for its functioning. These are contained in 
the Monitor Control Area. It contains swapping parameters, Job 
Mapping. Buffer. and Job Status Information. The control area 


is assembled in CSECT MONCTL. 
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EMT SERVICE 

1 Simple 
A). Get Data or perform other operation 
B) JMP RT13 

2 I/O Request 
A) Character I/O (KB, LP, CR, PR, PP) 


set "JBSTAT" = g 


set "JBWAIT" JS??? 


DO TRANSFER 


| Was Transfer Completed Ox? | 


Z ‘ 
se x 
pyes no 4 
"IOEXIT" l. "SAVJOB" 
"JBSTAT" = "JBSTAT"!JS??? ; set appropriate 2. Set JOB FLAG Bits 
Bits "JFREDO" 
3. JMP RTI3 
JMP RTI3 
B) NPR TRANSFER (DT, MT, DISK) 
| JBWAIT = JS??? 
JBSTAT = @ 
1. Set up 
2. "SAVJOB" 
3% Position Device and/or wait in queue 


3. "FNDJOB" ; find JOB/bring into core 
4. Do transfer 
5. Set JOB status bits 

“JBSTAT" = "JBSTAT" !1JB?2? 


6. JMP RTI3 10 ~/3 


ob Management and Scheduling 


ii » RSTS/E monitor software concerned with job management 


yd scheduling falls into the following routines and functions:- 


.- Main Scheduling routine (SCHED) 
- CORTBL search for a_job in core (CORE) 
- Find and lock a job into core or initiate a swap 


(FNDJOB) 


. Bring a_job into core (BRINGN) 
. Start (more) swaps if possible (SWAPP, SWAPIT) 


. Process swap completions (SWPRET) 
. Start a resident job and synchronise flags (RESJOB) 


. Force a_job to dump itself (FORCEQ) 
. Kill a job (KILL) 


- Dump the current job (SAVJOB) 


The Null Job (NULJOB) 


These routines are described in the following sections. 
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3.1 Main Scheduling Routine (SCHED) 


In RSTS/E scheduling is based on 


ry a round-robin scan of jobs (via JBSTAT and JBWAIT tables) 


and 


s a priority mechanism for the selection of the next job run 


If the next selected job is both runnable and resident, it becomes 
the next job to run. If it is runnable but not resident, an 
attempt is made to get it into core. This may mean Swapping out 
resident jobs in order to make room for the job in question. Thus, 
the scheduling of jobs may entail the initiation of a number of 
Sswap-outs before the required job can be swapped in and run. While 
jobs are being swapped out and the scheduled job is Swapped in, a 
search is made for a resident and aanabre job which is then run 

as a sub-scheduled job. If no such job can be found, NULJOB is 

run until a swap is completed, which on completion sets QSCHED IN 


Jom 


L3QUE ‘recall the scheduler. 
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3.2 CORTBL Search for a Job (CORE) 
a eee SOD. ACURE). 


This routine is called via a JSR PC, CORE with register Rg 


ne ding the number (*2) of the job which is the object of the 


CCRTBL search. The CORTBL is searched word by word until the index 


in R@ is found in a low-byte. If the whole of CORTBL is searched 
without finding the job, the N-condition hit is set true and copr 


returns. If the job is found, CORE returns with the N-bit = g 
a’ 1 R2 is holding the address of the highbyte of the word 


corresponding to the start of the job in core. 


3.3 Find and Lock a Job into Core or Initiate a Swap (FNDJOB) 


This routine first of all calls routine CORE to find the job 
passed on in R@ as a parameter (job number *2). If the return 

is negative (the job is not in core), FNDJOB calls BRINGN to 
initiate the swapping in of the job. If the job is in core, the 
high byte (in R2) of the job's corresponding CORTBL word is tested, 
and if non-zero, routine BRINGN is called to initiate the swap-in, 
if the swap-in bit is not already set, then FNDJOB just exists to 
RTI3, where the L3QUE flag word is set with the flags passed on in’ 


the FNDJOB call in R3. 


If the CORTBL high-byte on return from CORE is zero and the 

job is resident then COROFF is called to compute the real address 
imapped into two words, MAPHI and MARLOW which are stored in the 
Monitor Control Area). On return from COROFF, R2 still points to 
the CORTBL entry (high byte) for the start of the job, and the 
lock bit (LCK) is set in the high byte for all CORTBL words holding 


the corresponding job slot. FNDJOB then returns (RTS PC). 
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3.4 Bring a Job into Core BRINGN 


“RINGN is called via JSR PC, BRINGN with R@ by holding the job 
number (*2) for the job to be brought (swapped) into core and R3 


holds the L3QUE bits to be set when the job is made resident. 


Ri INGN initiates the swapnping out of iohs to make room for the 
swa,ped-in job (in R@) or, if this is not necessary, finds a 
} ole in core (smallest one that will accomodate job) and initiates 


a swap into the hole. 


An entry point in BRINGN i§ BRINGQ which is the entry point on 


dispatch from L3QTBL when the QBRING bit is set in L3QUE. 
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3.5 Start More Swaps Going If Possible NAPP, SWAPIT) 
This routine logically falls into two phases; 


1. A search through CORTBL for jobs whose SWP bit is true, 


2. The setting up of a DSQ (disk request queue block) and 
initiation of the swap for the job (IN or OUT depending 
on the IN or OUT bits). This is followed by a return to 


phase 1 to seek for more jobs to swap. 


This routine is a job housekeeping utility called on swap 
completions (SWPRET) and when jobs are brought into core by 


BRINGN ‘ 
The CORTBL search has three entry points:- 


1. SWAPP - which pushes#RT13 on the stack as the return address. 
2. SWAP - immediately following SWAPP, calls REGSAV to save the 
caller's registers. 
3. SWAPLP - after SWAP. As the name implies it is a loop 
return from SWAPIT (phase 2), and also is an aero 
point from BRINGN wh/ch has already saved the 


registers. 


Since SWAP references many data items, these are explained in 


the following subsection. 
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2,6 Process Swap Completions (SWPRET) 


‘nitially SWPRET checks SWDONQ, the queue of DSQ's of completed 
swaps. If the queue is empty then SWPRET calls SWAPP which seeks 
out and processes swaps. If a DSQ for a swap return is on the 
SWDONQ queue, then it is accessed to get the job index for the 
job from DSQJOB. If the job has been swapped out, then this slot 


ig zern, otherwise it holds the index of the swapped in job. 


If the siot is non-zero, a check is made on DSQERR in the DSQ. 
If an error is indicated, then the JFSWRR bit is set if the job's 
JDFLG slot is set true. From the DSQJOB, the job index allows 
access to JOBTBL to get the address of the job's JDB. The JDSIZ9 
(current size of job in K) is set equal to JDSIZ1, the swapped-in 


size. 


DSQMSC slot of the returned DSQ holds the high byte of the job's 
CORTBL entry. If the job has been swapped=in, this is the current 
CORTBL entry, whereas if swapped-out, it holds the Spevicus entry. 
From this byte, the type of swap (IN or OUT) can be ascertained 
from the appropriate bits. If the swap was 'OUT', SWAPF is decre- 
mented. SWAPF is a count of pending swaps OUT. Then, whether the 
swap was IN or OUT, the high bytes for the job's CORTBL entries are 
cleared. If the swap was out, then the low bytes (job index) are 


also cleared. 
CLRSWP is called to deallocate swapslots after swaps in. 


If the DSQ was SWAPAR (the fixed swap DSQ) then SWPRET branches 


back to the beginning to process further swap returns. If the DSQ 


msec t A ESS ES aa nn 
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3.6 Process Swap Completions (SWPRET) (Cont'd) 


waS a small buffer from the pool, then IOT (BUFFER RETSML) is 
effected, returning the DSQ to the small buffer pool. Then a 


loop is made back to the beginning. 
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3.7 (RESJOB) Start Resident Job and Synchronise Flags 


RE‘ JOB is called with R3 holding the job index (job number *2). 
 "“g is used to enter JOBTBL. The low core job management data- 
97se (JOBDA, JOBF, IOSTS, JOBWRK, and JOBTIM) is accessed. The 


tume used by the job (JOBTIM) is cleared. 


xOutine USRMAP 1S called to map tne job on the user vrage Adaress 
Registers and set the stack pointer to SYSTAK. If the JFKILL bit 
is set in the job's JDFLG slot of the job's JDB, then a jump is 


made to KILL to kill the job. 


If neither JFSWRR nor JFIRST bits in JDFLG are set, then the job 
is to continue where it left off. Therefore RESJOB branches to the 
‘return-to-job' code. Otherwise, RESJOB, enters an area of code 


in which the appropriate re-entry point to the RTS is found. 


If JFSWRR (swap error) is true, RESJOB branches to 11$, where 
the re-entry point is set to P.BAD, the RTS bad-job entry point. 
DIOST (I/O status slot in JDB) is set with the B.SWAP (bad-swap) 
bit. If the job has caused a stack error, (from JFSTAK-bit in 
JDFLG), then B.STAK is also set true in JDIOST. After this the 


routine enters the general job return code (18$). 


In 2$ if the JFCRAS, JFRUN or JFSTRT bits in JDFLG are true then the 
return addresses are set to P.CRAS, P.RUN or P.START appropriately. 
The general job-return code is then entered (1f$). Even if none 


of these bits is set in JDFLG. 
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3.7 (RESJOB) Start Resident Job and Synchronise Flags 


At 10$, the JDFLG2 bits are cleared, and then routine MAPRTS is 


called to map the run-time system onto the Page Address Registers. 


The user's PS is set up. This is pushed on the stack along with 
dummy registers (R@-R%). The return address (PC) is then pushed 
‘on the stack. The job index is given to the user in the FIRQB at 


FQUOB. 


If the return address is P.BAD (a bad job) then a branch is made 
to code which just returns to the RTS at the entry point. 
Otherwise the user's error flag work (KEY) is cleared, and the 
old register values restored along with resetting the floating 
point processor (FPP) if necessary. The stack pointer is then 


set up. 
The QSCHED bit (schedule) is cleared from L3QUE to indicate 


that the scheduling request has been processed. Then RESJOB 


returns by jumping to RTI3, the general level 3 return. 
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3.9 Kill a job (KILL) 


VILL is jumped to from RESJOB if the JFKILL bit is set in the 


~FLG2 byte of the resident job's JDB. 


. Initially, KILL clears the JBSTAT word for the job so that 
it is non-runnable, and the JSFIP (waiting for FIP completion) 
bit is set true in the job's JBWAIT word. Setting the JBSTAT 
word to zeru makes the job non-runnable since the scheduler 
runs a job when the logical ‘and' of its JBSTAT and JBWAIT 
words is non-zero. The JSFIP bit is set true since killing 
involves a queued file servide (FIP) request to clear out 


any pending IO requests... I/O rundown. 


; If the file service request has already been made (JFKIL2 bit 
set in JDFLG) then KILL branches to the clearing up house- 


keeping at 1@$. (KILL immediately). 


: If the JFKIL2 flag is not set, then it is set and JFHIBY and 


JFPRIV bits are set in the job's JDFLG. 


JFHIBY means that the job is in a critical state and JFPRIV 


means that it has permanent priveleges. 


; The job's work block is accessed and used as a FIRQB in 
which is placed:- 
; the job's number (*2) 
. the clean-up function (UUOFQ) 
: the channel slot is set to +5 as a code for logging out 


the job. 
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3.9 Kill a job (KILL) (Cont'd) 


‘ Routine UNLOCK is called to unlock the job from core. 
Routine SAVJNL is called to set up NULJOB to run and dump 


current job. 


‘ KILL then jumps to FIPSYS in FIP which then processes the 


| request defined by the FIRQB. just created. 


- At 19$ tthe immediate kill entry which is branched to within 
kill if JFKIL2 is set) the following routine actions are 


carried out:- 


- Priority is switched to 7 to prevent any interrupts 

‘ Mode is switched to Kernel mode 

. If the job is not already detached it is then 
detached (DDJBNO slot in terminal's DDB cleared) 


‘ CORE is called to find the job's entry in CORTBL 


‘ The job's entries in CORTBL are cleared 
s The job's JOBTBL entry is cleared 
A SAVJNL is called to set up null job and clear the 


current entries for the job 

: The IOT BUFFER is effected with parameter RETSML to 
return the JDB and WORK blocks for the job 

P The job count (OBCNT) is decremented 


: and a jump is made to RTI3 for return and reschedule. 
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3.10 Dump the Current Job (SAVJOB) 


This routine dumps the current job and optionally saves the 


job's quantum. 


At SAVJQX (an entry point prior to SAVJOB) a check is made 
on whether the current job is non-null 

. Otherwise, At SAVJOB, if the current job is non-null, the 
current quantum is destroyed for the job (SVQUNT) 

. if the current job is NULJOB, then SAVJOB branches to SAVJNL 
UNLOCK is now called to unlock the current job from core 

- The JFCODE bit in the job's JDFLG work of its JDB (pointed 
to by JOBF) is tested 

. If JFCODE is true then the job is running impure code (not 
BASIC-PLUS) then the JFFPP (save/restore floating point unit) 
bit in the job's JDFLG is cleared, otherwise the JFLOCK 
(lock job in core) bit is also cleared 
The user's key word (KEY) - flags to be set on re-residency 
or running - are moved into the job's JDFLG slot in its JDB 
The user's stack pointer is checked and if it has not overflowed, 
the current user's registers (which have already been pushed 
on the kernel stack) are popped onto the user's stack 

. If the user's stack has overflowed into the stack save area, 
the JFSWRR is set in the job's JDFLG to signify a swap error 
(something wrong with the job) 

. The JFSTAK (stack overflow) bit is set in the job's JDFLG2 byte 
of the JDB 

. Then the user's registers (SP,R@ ---RS,PC,PS) are pushed on 


the user's stack 
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3.10 Dump the Current Job (SAVJOB) (Cont'd) 


- Routine MONFSV is called to save FPP status if required 

- Routine SAVTIM is called to save timing and core utilization 
information 

- SAVJNL is then entered to set up the null job. The stack 
pointer is set to the system stack, the monitor data cells 
JOB, QUANT are cleared and bit QSCHED is set in L3QUE to schedule 
another job and then a jump is made to the caller's return 
address 

- Routine SAVTIM is in the SAVJOB module 

- SAVTIM computes the accu iwkive KCTs (Kilo-core ticks) from 
JOBTIM (CPU time) and JDSIZ% from the JDB (current size of job) 

. If the job is detached, SAVTIM returns 

. If not detached (by accessing terminal DDB from JOBDA slot in 
monitor data area and then looking at DDJBNO slot of DDB) then 
the time at which the job was attached to the terminal is 
found from DDTIME in the DDB and corrected for midnight if 
necessary. This is then added to the total in JDCON slot of 


the JDB. SAVTIM then returns. 
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3.11 The Null Job (NULJOB) 


rhis job runs when no other user job is running. It displays a right 


* left movement of lights on the 11/45 data paths display. 
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4.0 Core and Memory Management Routines 
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4.1 Monitor core manager expander/shrinker (CORE) 


This routine is dispatched to from EMTTBL as a result of a 


user EMT .CORE. 


The caller's XRB holds the parameters of the call. The new core 
size requested (in K words) is passed at XRB+#, with the 
restriction that it is non-zero and less than or equal to 


(,ORMAX. oa 


If room. is available for expansion or if the size is less than 
its current size, CORTBL is mapped accordingly. If the expansion 
cannot be carried out, then the job is swapped out and brought in 
again with the new size. On exit, if IOSTS is zero then the new 
size was effected, otherwise the new allocation was not carried 


out since the request was in error. 


. CORE. first of all gets the new size from the user's 
XRB+@ slot. 

‘ IostsS is set non-zero in anticipation of error. 

‘ The job's JDB and RTS blocks are accessed (via JOBDA, 
and the JDRTS slot of the JDB respectively. 

; Via the R.USIZ ENTRY in the RTS description Block, 
CORE. checks that the request is not bigger than 
the maximum for the job. If it is then CORE. again exits 
to RTI3.4 indicating an error in IOSTS. 

‘ Otherwise IOSTS is cleared. 


, Via JOB (job slot) the job;s slot is accessed and routine 


CORE is called to locate the job in CORTBL. 
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4.1 Monitor core manager expander/shrinker 


= i Fa = 


- The JDSIZ1 (new size) slot is set in the JDB to the requested 
value. 

. If an expansion is required then CORE. branches to 3S. 

; If the request is less nan the present size, then CORE. 
enters 1$. If same 2S. 

At 1$, CORE. clears the extra CORTBL entries, and then enters 
2$ where USRMAP is called to remap the user. and a test 
is made to see if changing RTS. If so, go to Res job entry 
SAUJQX If not, exit via RTI3.4. 

; At 3$ (processing core expansions) CORE. checks to find 
whether there. is free space to accommodate the new size. 

If there is then CORE. re-enters 2$ and again calls USRMAP 
to effect the new mapping and jumps to RTI3.4. 

A If there is not enough room for expansion, CORE. gets the 
job's current size (JDSIZ@) and saves the current CORTBL 
pointer. Then it sets the SWP and LCK bits for all CORTBL 
entires of the job and branches to SWAPP to initiate 


the swap. 
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‘.2 Map a job into user space USRMAP 


The function of this routine is to set up the user Page Address 
R° gisters(PAR) to map a job. 
The job slot is obtained from JOB. 
Routine CORE is called to find the start of the job in CORTBL. 
On return it starts a loop which sets the LCK bits true in the 
CORTBL entries for the job. 
From this, the number of entries for the job are computed, so 
the job size is known. 
Since CORTBL maps 1 word for 1K words of store for all physical 
store, then the following computation sequence gets the entry 
for PAR# for the user:- | 
‘ Let the offset in CORTBL for the job start (on a 1K 
boundary) = x. Then x = number of K (words) *2 (i.e. 
the byte address in K). 
A There are 16. blocks of 64. bytes in 1K bytes. 
Hence, since PAR address in units of 64. byte, then 
x*16. gives the appropriate PAR entry. 
USRMAP, therefore, from the CORTBL entry computes the entry for 
PAR@. If the job exceeds 4K (words) then PAR] is set equal to 
PAR# + 268 (29968 = 4K) and so on. 
. Also, the associated descriptor registers are updated (length = 
8K bytes and access = R/W). 


. Finally, the job's flag word (JDFLG) is tested, and if negative 


the job is running impure code and therefore there is no run-time 


system to map into the user's PARs and therefore USRMAP returns, 


If code is pure USRMAP enters MAPRTS. 
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4.3 Map a run-time system (MAPRTS) 


If a job is associated with a run-time system (resident library) 


then this is mapped from PAR7 downwards. 


From the job's JDB, the RTS description block is accessed. 
From the R.CPTR entry in the RTS block, the CORTBL offset for 
the RTS is found. 

From the RIKCT slot of the RTS block, the size of the RTS in K 
words is given (no. of CORTBL words). 

In the R.REDO slot of the RTS block is the 4K description 
pattern for the descriptor registers of the map. 

MAPRTS then simply uses R.CPTR*16. as the PAR7 entry and loads 
R.REDO into the descriptor register 7. | 

It then backs up to PAR6 and places PAR7-2@9 there (4K less) 
and so on until the last entry, when the actual descriptor 

is used. 


MAPRTS then returns. 
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4.4 Scratch memory mapping for core-core transfers (SCRMAP) 


At the start of this routine MAPHI and MAPLOW are already set up 
as the most and least significant parts respectively of the job 


.cart. (The real address). 
SCRMAP is entered with R5 holding a user's virtual address. 


he job of SCRMAP is to point the kernels PAR6 at the same real 
address as the user's virtual address in R5. But in V5C +V6 
RSTS/E PAR6 also is used to point to monitor code at the proper 


time. 
Therefore SCRMAP does the following:- 


It moves MAPHI into R4 (in preparation for R4/R5 double length 
register). 
It adds MAPHI to the virtual address in R5 and any carry to R4. 
. Hence R4/R5 now holds the real address of the virtual address 
in R5. 
The combined register is shifted left 6 bits (divided by 64. to 
give a byte address on a 64. byte boundary). 
- R5 now holds a valid PAR address which is then loaded into 
the kernel's PAR6. 
. The descriptor register 6 of the kernel is set to 4K and R/W. 
. Now, before R4/R5 was shifted left 6 bits (don't forget the 
remainder), R5 had been pushed on the stack. 


». RS is now restored from the stack and all but the lowest 6 bits 


are cleared. 
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4.4 Scratch memory mapping for core-core transfers (SCRMAP) (CONT'D) 


. Therefore by adding 6*29998 to R5 we have in R5 the correct 
virtual address in kernel space for the user virtual address 
passed to SCRMAP. 

. SCRUMP has been appended to SCRMAP to handle .Remaping into 


kernel window. 
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4.5 Compute real address (COROFF ) 


This routine computes a double length real address of a job start 


from its CORTBL entry (K address in bytes). 


The offset within CORTBL is found from R2 (which arrives 
holding the job's CORTBL entry), leaving the result in R2. 
Hence R2 is moved to R3 in preparation for treating R2/R3 as 
a double length register, and is then multiplied by 124 . 
(218) to give the byte address. 
The least significant part (R3) is moved to MAPLOW. 

- R2 is shifted left 4 bits to give some free bits (don't ask me 
why) and loaded into MAPHI as the most significant part of the 
real address (*16. of course). 


. COROFF then returns. 
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This 'routine' is the line clock or KWII-P handler aepenaiuc - 
upon the system clock. | 

It is activated at line frequency (Go CPS standard). 

The time currency in RSTS/E is the system tick (1/1 second). 
The WAITNT (wait for a system tick) bit is set in L3QUE to get 
the system to wait until 1 system tick is up. 

If a second has just passed, then the number of ticks to next 
second (in TIMCLK) is reset to equal the line frequency, and 

the QTIMER bit is set in L3QUE to schedule the timer service 
(TIMERS) . 

If a minute has passed, the number of seconds to the next minute 
is reset. | 
If a day has passed (1449. minutes) a new day is counted and no 
minutes to next day reset. 

JOBTIM (ticks used by current job is incremented) and the amount 
of his quantum remaining (in QUANT) is decremented. 

If the quantum has expired then QSCHED is set in L3QUE to 

effect a reschedule and QUANT is cleared. 


CLOKS then jumps to RTI47 the common ‘handler' return. 
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.G I/O Subroutines 


jose routines are I/O housekeeping and checking routines for the 


“RE I/O interface (i.e. non file structured I/O). 
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5.1 Routine to set status bits in JBSTAT on I/O completion (IOFINI) 


It is called with Rl pointing to the DDB of the device concerned, 
and the address after the call (JSR R5, IOFINI) holding the required 
JBSTAT bits to set. 
. From this the corresponding job number is obtained from the 
DDJBNO slot in the DDB. 
. The number is then used to address the JBSTAT table and the 
bits in the word after the IOFINI call are set in the 
appropriate JBSTAT slot. 


. i IOFINI then returns. 
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5.2 Transfer a character from the user buffer (TTYS28 and TTYS39@) 


At TTYS29 the current buffer address in user space (passed on 
in R5 at XRLOC in the XRB) is obtained. The current character 
(XRLOC points to it) is loaded into R2. 

The PS priority level is raised to 5 with kernel-mode new and 
user mode-oOld Dits set. This prevents celevant 4itlEercupts. 

. MTTYS29 then returrs with R2 holding the character. 

. On calling TTYS39, if the C-bit is set then an error has been 
detected by the caller. 

. R5 is pointing to the user's XRB at XRLOC the current byte in 
the user's buffer. 

. Priority level is set to 3. 

. If the C-bit is not set then the buffer address is incremented 
and the byte count decremented for the user in the XRB at 
XRLOC and XRBC respectively. 

. TTYS39 returns. 

. If the C-bit is true, then TTYS39 dumps the saved PC from the 
stack, and starts an I/O retry at IOREDO, described in the next 


section. 
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5.3 Re-effect I/O routine (IOREDO) 
- IOREDO sets the JFREDO flag in the jobs JDFLG wora. 


- Caiis SAVJOB to dump the job. 


- Jumps to RTI3, the common level 3 exit. 
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5.4 Exit from I/O completion (IOEXIT) 


The job slot is obtained from JOB and the bit the job is 


waiting for (in its JBWAIT word) is set in the corresponding 


JBSTAT word. 


IOEXIT then branches to RTI3 to exit. 
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5.5 Response to EMT .SLEEP (SLEEP) 


. SLEEP. is dispatched to form the EMTTBL 

. The job slot is obtained from JOB. 

- The entry in the user's XRB + § slot is obtained (being the 
sleep time in seconds) and entered into the job's JOBCLK entry. 

. If the sleep is zero, SLEEP. immediately exits to RTI3. 

. If the sleep re non zero, the JBSTAT word for the job is cleared 
makeing it non runnable. 

- The job's JBWAIT slot is set to JSKEY and JBWAIT bits. 

- SAVJOB is called to dump the job and 


. SLEEP. then jumps to RTI3. 
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6 Character transfer from buffer pool to user (CHRUSR) and (CHRU#1) 


gn calling both (JSR R#, CHRUSR or CHRU#1) Rl holds the 

jevices DDB address add R5 points to the user's XRB at 

the current buffer address at XRLOC. 

At CHRUSR:- 

The PSW is set to priority 5 to inhibit relevant interrupts. 
Routine FETCH igs called to get a character from the buffer pool 
(placed in the current position (FP) offset to DDINP in the DDB). 
On return from FETCH the priority level is set to 3 again and 


the C-bit is set if no more characters are available. 
If this is the case, CHRUSR exits, otherwise it enters CHRU#1l. 


At CHRUf#f1, the character is moved into the user's buffer, the 
byte count incremented and the buffer address. If the byte 
count has now exceeded the buffer size (in XRB) then CHRU#1 
returns to the address given after the call if no user buffer 
room left. 

If there is more room, then CHRU#1 returns to the address 


given by the caller after the call. 
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5.7 Check availability of buffers (FREBUF) 


At the call Rl points to the appropriate DDB. After the call is 


the Byte Count Fudge Factor. 


It traces through small buffers from FREES (small buffer pool 
head), until enough have been found to accommodate request. 
FREBUF also checks to see if device has reached its quota yet 
as well as whether or not enough buffers are free to exceed 
quota to 24% of system total. If not enough can be found, the 


C-bit is set and FREBUF exits. 
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5.9 User 1/0 EMT interface (USERIX, USERIO) 


USERIX is entered from RTI3 for re-doing of I0 
USERIX tests the JFGO bit of the job's JDFLG word. If true, 
it exits to RTI3 at RTI93, to effect the force. 

. If the job hasn't been forced out, it drops to level 3, clears 
the I/Q@ re-do bit in JDFLG. Accesses the XRB and obtains the 
tunction (read/write) from XRCi+1l in the XR. 

. It then enters UCERIO at USERI1, missing out on moving of 
XRB into the job’s work block by MOVXRB. 

. USERIO is dispatched to from EMTTBL on EMTs .READ and .WRITE 
and then, dispatches itself to the appropriate handler. 

. On dispatch from USERIO the following contain:- 


RG = 2 for read and 4 for write (access having been verified) 


Rl = address of DDB or FCB 
R2 = handler index (to access handler tables) 
R3 = pointer to XRB (at XRLEN) 


R5 = byte count pointer (XRB at XRBC) 

. At USERIO, MOVXRB is called to move the XRB into the job's 
work block. 

. The channel slot is got from XRCI in the XRB. The job's IOB 
(IO block) is entered at the channel slot to get the corresponding 
DDB or FCB address. 

. If the channel is closed, the error status slot JDIOST in the 
job's JDB is set with bit NOTOPN. and USERIO branches to RTI3. 

. If the channel is open, then the legality of access is checked 
against the DDSTS slot of the devices DDB. I.E. you cant read 


from an output only device and vice-versa. 
. If access is invalid then bit PRVIOL (privelege violation) is set 


in the job's JDIOST slot in its JDB. 
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If access is valid, then the handler index is obtained from the 
DDB or FCB. 
The handler index is used to set the corresponding bit in the 


job's JBWAIT word, with the corresponding bit in JBSTAT being 


cleared. 


The handler index is then used to enter SERTBL (the table of 
handler addresses) and USERIO dispatches to the appropriate 


handler from the appropriate SERTBL entry. 
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6.0 Notes on the File Processor 


General Functions of FIP. 
1) opens & closes 
a) files (initializing & maintaining file structures) 
b) non-file-structured devices. 
2) has facilities for executing non-resident system code 
(--hence it handles certain pieces of the compiler 


and RTS code). 


FIP runs asynchronously from the rest of RSTS 

-has its own stack 

-has its own date base 

-runs at level 3 

-is started by EMT calls 

-~is restarted frou level 3 queue on disk I/O completion 

-serves one job at a time. Each request must be completed 
or reach an error condition before the next is begun. 

As FIP completes the service for each request, it scans 
its queue (orginating at FIQUE) and starts the next 


request if there is one. 


When a user job requests a FIP service, 
1) the request is placed in the FIP queue (originating at 
FIQUE) , 
2) the job goes into an I/O wait state for FIP. 
Normally such a job can be swapped out, but a few 


FIP requests cause a job to be locked in core. 
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Notes on the FIle Processor (Cont'd) 


The FIP queue is a chain of FIRQBs (File Request Queue Blocks) 
originating at FIQUE. 
Each FIRQB specifies the parameters for a FIP request. 


When FIQUE = 9, FIP is no longer busy. 


FIP uses 2 buffers of 256 words each. 
1) FIBUF is a directory buffer. 


2)  FIPBUF is a buffer for non-resident code. 


Typical steps in executing a FIP request: 
1) ainitialize FIP's in-core data base. 
2) if non=resident code is needed, read code module 
into FIPBUF. 
3) dispatch to function handler. 
4) set completion and/or error flags. 
5) check FIQUE; if there is a next request, branch to it. 


6) exit to RT13. 
Approximately 5/6 of FIP is non-resident, swapped in as needed. 


Notes on data errors: 
1) There is no software error detection (such as 
checksumming). 
The only errors reported in data are those detected 
by the device controllers. 


2) Data transmitted to a hung device is lost. 
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STRING HANDLING 


- processing strings, it is essential to arrange the program 
-¢ as to avoid "garbage collection". Note that garbage collection 


maps the job out and in again. 


‘ne technique is to pre-assign all strings to their maximum length 

ising the SPACES function and then use LSET and RSET to assign 
ags. A variation of chive technique is used by EDIT. 

A data bufier is defined by opening a dummy keyboard file. 

Then. data is moved within the buffer by one of FIELD, LSET, and 

“SET statements. For example, to insert text into the middle of. 


the buffer, the program acts as follows: 


1000 FIELD #B%, D% AS BSS, 2% - D%& AS BPS 
FIELD #B%, D% AS B1$, D8% AS BlS$, 2% ~ D% AS B2$ 


The data buffer now has the following structure: 


D% D8% Z% - DS 


We may now insert the string D8$ (length D8%) by the statements: 


1100 RSET B2S = BPS : move what follows 
LSET B1$ = D8$ : move in insertion 

Z% = Z% + D8% : Z% is total length 

D% = D& + D8&% D% is length up to 


end of insertion. 
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STRING HANDLING (CONT'D) 


To define the buffer, the program first executes: 

100 BY = 2% : Z% = 5P% * 74% 

OPEN "KB:" AS FILE Bt, RECORDSIZE Z% 

.S an example of three string-handling algorithms, consider 
the problem of truncating trailing blanks from a data record 
(for example, a card image). The two functions take as input 
any string, veracning the same string without trailing blanks 
and CR-LF. The program segment performs the same function within 


an input buffer. 


The slowest algorithm succesively reassigns the argument until 
it ends with a non-blank: 
1969 DEF FNTS (XS) 
X$ = LEFT (X$, LEN(XS$)-1%) 
WHILE RIGHT (X$,LEN(x$)) <= "_" 
AND LEN (X$)> 9% 
1919 FNTS = X$ 
1929 FNEND 
Results: 113 sec. clock, 18.6 sec. cpu time. 
The following is much more efficient. It scans backwards until 
a non-blank character is found. Only one sen gnment is made. 
2966 DEF FNT1S (xS) 
GOTO 2619 IF MID(X$,X%,1%)>" " 
FOR X% = LEN(XS) TO §% STEP -1% 
2919 FNT1S = LEFT (XS,X%) 
2928 FNEND 


Results: 9 sec. clock, 6.0 sec. cpu time. 


The most efficient algorithm uses the data buffer directly, 


avoiding the assignment caused by function calling and the 
Jf x2 


STRING HANDLING (CONT'D) 


final assignment at line 2918 above. (L% is the record length.) 
3000 FOR K% = L% TO 1% STEP -1% 
FIELD #2%, K$-18 AS L$, 1% AS L$ 
IF L$?" " THEN 
FIELD #2%, K% AS L$ : GOTO 3929 
3919 NEXT K% : LSET L$ = "" 
3928... 
Results: 7 sec. clock, 7.0 sec. cpu time. 
Note that the more efficient algorithms are much more cpu-bound, 


showing that they are doing much less swapping. 


Use of INSTR to scan a text. 


Assume that a text is stored in the string S$ in the following format: 
"wordl word2 word3 " 
i.e. each word is followed by exactly one blank. A blank even 


follows the last word in the string. 


The subroutine at line 1000 is executed once for each word. 
The word will be in WS. 

note the following 

WS the word to process 

L1% points to the first byte of the word in S$ 


L2% points to the blank following the current word 


198 L2% = 9% linitialize for first 
298 L1% = L2% + 1% 1L18 ~ first byte 
369 L2% = INSTR(L1%,S$," ") !Iget trailing blank 
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STRING HANDLING (CONT'D) 


499 IF L2% 
THEN WS = MID(SS$,L1%,L2%-1%) 
GOSUB 1998 : GOTO 29 !found, process it 


598 ! nothing left in S$ 
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TIMING 


The built-in functions TIME, TIMES, and DATES may be used 
to time programs. Note that the following subprogram will be 
complex if the program may run Sask aidnite. To use these 
routines, execute 

GOSUB 20010 to start timing 

GOSUB 20000 to print the clock and 


restart timing. 


20008 TO = TIME(S) - TW : Tl = (TIME(1) - T1)/1Q. 
PRINT TY; "clock time", Tl; "run time"; 
IF T@ = 9.9 THEN PRINT 
ELSE PRINT , T1/T@Z; "ratio" 


29010 TH = TIME(#) : Tl = TIME(1) : RETURN 
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eSTS -- STATEMENT HEADERS 


' .CH LINE-NUMBERED STATEMENT CONTAINS A 12-BYTE HEADER, USING 


‘oLTIPLE STATEMENTS CAN SAVE MUCH SPACE. FOR EXAMPLE, 


100 X = @ 
110 Y=1 
120 Z = 2 


SHOULD BE WRITTEN 
100 X= @:"%=1: Z2 = 2 


THIS WILL SAVE 24 BYTES. 
NOTE, HOWEVER, THAT CERTAIN STATEMENTS ALWAYS HAVE A HEADER -~ 
EVEN IF NO LINE NUMBER WAS WRITTEN. THEY ARE: 


DEF | SINGLE- OR MULTIPLE-LINE 


FNEND 


DIM REQUIRES TWO HEADERS, ONE BEFORE AND ONE AFTER 


100 S=6@: FORI = 1TON: S=S + X(I) : NEXT I 
100 S = 9 


110 FORT = 1TON: S=S + X(T) 


120 NEXT I 
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RSTS -- CODE GENERATION 


RSTS COMPILES THE BASIC PROGRAM INTO SINGLE-BYTE CODES. THE 


VARIOUS COMPONENTS OF A STATEMENT HAVE THE FOLLOWING LENGTHS: 


12 STATEMENT HEADER (FOR EACH LINE-NUMBER) 

1 STATEMENT END 

1 OPERATOR (+, -, MATRIX OPERATORS, ETC.) 

3 CONSTANT OR VARIABLE 

1 CONVERSION (EXCEPT THAT A = B$% REQUIRES NO CONVERSION) 
4 FUNCTION 

6 USER-DEFINED FUNCTION 


3 INDEX 


ALSO, ONE EXTRA BYTE MAY BE GENERATED TO FORCE THE LENGTH TO AN 
| EVEN NUMBER OF BYTES. FOR EXAMPLE: 
100 1% = A+ B #® SIN(C(X)) 
12 3 3 1 3 1 4 3 3 
1 (FOR CONVERSION TO INTEGER) 
3 (FOR INDEXING) 


TOTAL = 37 BYTES. 


NOTE THAT A TEMPORARY VARIABLE MAY BE USED TO SAVE VECTOR. ADDRESSING: 


100 FOR I% = 1% TO N% 
S=S + X(I%) : S2 = S2 + X(I%) @ X(I%) { 42 BYTES 
110 NEXT I 
BUT 
100 FOR I% = 1% TO N% 
T = X(I8) 
S=S+T: S82 =82+T eT { 12+24 BYTES 


110 NEXT I 
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.""S =~ VARIABLE STORAGE OPTIMIZATION 


“ACH DISTINCT NAME REQUIRES 4 BYTES PLUS THE NUMBER OF BYTES 
:&QYUIRED TO STORE THE DATA. IN ADDITION, EACH DISTINCT 
"i; iRST NAME" REQUIRES 2 BYTES. 

PF, £3, FS, FNF, FNF%, FNFS, F(...), FE(...), FR...) 
RACA HAVE THE SAME FIRST MAME, WUILE 

fF AND Fl OR F AND G 
It JOT, THUS, IF YOJ USE F, YOU SHOULD USE F% ALSO. MTRY TO USE 
AS FEW DIFFERENT VARIABLES AS POSSIBLE -- REUSE VARIABLES WHENEVER 
POSSIBLE. 


DATA STORAGE REQUIREMENTS ARE AS FOLLOWS 


2 INTEGER 
4 OR 8 FLOATING POINT 
6 +N STRING, WHERF N IS THE STRING LENGTH IN BYTES 
4 IF THIS IS THE NAME OF A FUNCTION 
26 BYTES FOR AN ARRAY HEADER, PLUS SPACE FOR EACH VALUE. 


FOR CONSTANTS, ONLY THE VALUE SPACE IS NEEDED. NOTE THAT CONSTANTS 
Akt STORED WITHIN THE PROGRAM. THUS 
100 A@ 2.7 : B= 2.7 
IS WASTEFUL, USE 
100 A=2.7: Be=A 
INSTEAD. 
OF COURSE, 
100 A, B= 2.7 


IS THE MOST EFFICIENT. 
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RSTS -- PROGRAM OPTIMIZATION 


AVOID DYNAMIC ALLOCATION OF STRINGS. AT THE BEGINNING OF A PROGRAM, 
ALLOCATE ANY STRINGS AT THEIR MAXIMUM LENGTH: 

100 XZ = SPACES (MAX$) 
WHERE MAX IS THE MAXIMUM LENGTH OF THE STRING. THEN, USE THE LSET 


AND RSET STATEMENTS TO MOVE DATA INTO THE STRING. DON'T RE-USE LET. 


USE THE CHANGE STATEMENT TO ACCESS ELEMENTS AS AN INTEGER ARRAY. 


CONSIDER: 
100 AZ = "ABCD" : BY =SPACE¢ (5%) ts. ALLOCATE SPACE 
200 C$ = AZ : LSET BS = ag : DON'T ALLOCATE SPACE 
300 Dg = AS + "E" ; ES = LEFT (Ag,28) +: ALLOCATE SPACE 


NOTE THE TWO TYPES OF STATEMENT IN LINE 200 
CZ = Ag THE VARIABLE Cg POINTS TO THE SAME ADDRESS 
AS THE VARIABLE AS. 
LSET CZ = Ag THE STRING THAT AZ POINTS TO IS COPIED INTO 
THE DATA AREA THAT C$ POINTS TO. 
NOTE ALSO 
cg =ag+"" CONCATINATES AZ WITH THE NULL-STRING WHICH 
ALLOCATES MEMORY SPACE AND THEN COPIES THE 


STRING THAT A% POINTS TO. 
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RSTS -- PROGRAM OPTIMIZATION 2 


STRING MOVEMENT EXAMPLE. ASSUME THE SITUATION WHERE 


Ag rs a i ABCD " 


or: ee \> tT] DEF wt 


AFTER 100 CZ = Ag 


—_~ - Hanan 


Ap ES Cc ‘Or 
Cs ) 
AFTER 100 LSET C$ = Ag 
Ag ——---- Te= "ABCD" 
C8 BO ABC" 
AFTER 100 cg = Ag+ "" 
Ses > "ABCD" 
Cg edt aeweepee: Ged Ve " ABCD" 


NOTE THAT IF AS POINTS TO AN I/O BUFFER (BY THE FIELD STATEMENT) , 
THE STATEMENT | 

100 CZ = Ag 
WILL CAUSE C$ TO POINT TO THE SAME PART OF THE I/O BUFFER. IF 


A NEW DATUM IS READ (USING GET), C8 WILL POINT TO DIFFERENT DATA. 


WHEN YOU MUST MANIPULATE STRINGS, TRY TO USE ASCII AND CHANGE 


STATEMENTS. AVOID USING TEMPORARY VARIABLES IF NOT NECESSARY. 


INSTEAD OF 
100 MZ = LEFT(QS, 3%) 
110 NS = RIGHT(PS, 2%) 
120 Tg = MS + NS 
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RSTS -- PROGRAM OPTIMIZATION 2 (CONT'D) 


USE 


100 TS = LEFT(QS, 3%) + RIGHT(PS, 2%) 


OPEN FILES AT THE BEGINNING OF THE PROGRAM, NOT IN THE MIDDLE. 


Uf tt 


RSTS =~ :CODING OPTIMIZATION 


USE INTEGER VARIABLES WHENEVER POSSIBLE, ALWAYS SPECIFY EITHER 


'$' OR '.' WHEN WRITING CONSTANTS. 


“SE MULTIPLE STATEMENTS PER LINE. (THE MAXIMUM STATEMENT LENGTH 


FOR MULTIPLE-LINE STATEMENTS IS 256 BYTES). 
USE ! TO INDICATE COMMENTS INSTEAD OF REM. 
IN IF STATEMENTS, DO NOT COMPARE VALUES WITH ZERO: 
IF at g GO TO 169 
SHOULD BE WRITTEN 
IF A$ GO TO 199 
USE STATEMENT MODIFIERS WHENEVER POSSIBLE (SEE BELOW). 
FREQUENTLY USED CONSTANTS SHOULD BE DECLARED AS VARIABLES. 
AVOID MAT COMMANDS. 
AVOID ARRAYS -~ USE INDIVIDUAL VARIABLE NAMES WHERE POSSIBLE. 
IF YOU USE ARRAYS, ALWAYS DIMENSION THEM AND SPECIFY 


INTEGER SUBSCRIPTS. ARRAY ELEMENTS SHOULD BE INTEGERS 


WHENEVER POSSIBLE. 
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RE-USE PREVIOUSLY CALCULATED ITEMS. AVOID INTERMEDIATE TERMS : 

A=B+C 
D=At+E 

SHOULD BE WRITTEN 
D=B+t+CHteE 


UNLESS A IS NEEDED INDEPENDENTLY. 


DON'T USE USER-DEFINED FUNCTIONS, ESPECIALLY WITH STRINGS. USE GOSUB. 


' ALWAYS EXIT FROM SUBROUTINES VIA RETURN, NEVER VIA GOTO. 
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RSTS -- FILE AND MOVING-HEAD DISK OPTIMIZATION 


OPTIMIZE PACK AND FILE CLUSTERSIZE. 

KEEP LARGE, FREQUENTLY USED FILES ON SEPERATE DISKS. 
PRE-EXTEND FILES TO THEIR MAXIMUM SIZE. 

PRE-ALLOCATE SCRATCH FILES. THEN, DO NOT KILL THEM, BUT CLOSE 
AND RE-USE THEM. 

CLEAN DISK STRUCTURES: COPY ALL ACTIVE FILES TO MAGTAPE, THEN 
RE-STRUCTURE THE PACK USING DSKINT. 

KEEP PRODUCTION AND DEVELOPMENT ACCOUNTS SEPERATE. 

t[F TWO FILES ARE TO BE OPEN AT THE SAME TIME, KEEP THEM ON 


SEPERATE DISKS IF POSSIBLE. 


FILE CLUSTERSIZE 

A FILE-CONTROL-BLOCK (FCB) IS USED TO LOCATE THE ACTUAL SEGMENTS OF 
A FILE. SEVEN SEGMENTS FIT IN ONE FCB. IF THE FILE REQUIRES MORE 

THAN SEVEN SEGMENTS, A SECOND FCB IS READ FROM DISK. TRY TO DEFINE 


FILE CLUSTERSIZE SO ONLY ONE FCB IS NEEDED. 


THE NUMBER OF FCB BLOCKS IS GIVEN BY THE FORMULA: 


N = 1 + INT((FILE LENGTH IN SECTORS / 7) x CLUSTERSIZE) 


FOR EXAMPLE, FOR A FILE HAVING A LENGTH OF 200 SECTORS, N WILL 


HAVE THE FOLLOWING VALUES 


N CLUSTERSIZE 
29 1 | 
15 2 

8 4 

4 8 

2 16 

1 32 


IF POSSIBLE. 


CHOOSE A CLUSTERSIZE OF 32, 
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RSTS -- RECORD TRANSFER OPTIMIZATION 


JSE RECORD I/O WHEREVER POSSIBLE. 


AVOID READ AND PRINT AS THEY ARE VERY SLOW (CHARACTER BY CHARACTER). 


WHILE VIRTUAL-ARRAY I/O IS FAST, IT MAY REQUIRE MULTIPLE ACCESSES. 


:OR EVAMPLE: 


100 DIM44%, A(500%), B(500%) 


200 C(I%) = A(I%) + B(I%) FOR I% = 1% TO N% 


THIS WILL REQUIRE ONE READ FOR A(I%) AND ANOTHER FOR B(%). THE 
SECOND WILL BE TO A DIFFERENT AREA OF THE DISK. IF A FILE STRUCTURE 
WERE DEFINED WHERE A(I) AND B(I) WERE PARTS OF RECORD I IN A 

FILE ACCESSED BY GET, ONLY ONE ACCESS WOULD BE NEEDED. fTHUS, 

YOU TRADE A MORE COMPLEX PROGRAM (GET FOLLOWED BY FIELD FOLLOWED 

BY THE COMPUTATION) FOR A SIMPLER I/O STRUCTURE AND A MUCH 
FASTER-RUNNING PROGRAM -- ESPECIALLY IF THE FILES ARE LARGE AND 


ARE STORED ON A MOVING-HEAD DISK. 
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DEVICE DRIVER 


DIGITAL EQUIPMENT CORPORATION 


A Device Driver Needs: OPEN Routine Lev 3 
Service Routine Lev 3 
Close Routine Lev 3 
Interrupt Handler INT Level 


OPN XXX 
SER XXX 
CLS XXX 
XXX INT 


Three exits and nine sub-routines exist in the Monitor for use 
by Device Drivers. 


OnNnNU BWNF 


-REGSAV 


FETCH 

STORE 

CIRBUT 
FREBUT 
CHRUSR 
CHRUS1 
TTY520 
TTY530 
IOFINI 
IOEXIT 
IOREDO 
RESRT4 


ISR RODRS5 SAVE 


UPDATES DDB & GETS CHAR 

STORE CHAR & UPDATE DDB 

CLEARS SMALL BUFFER CHAINS 

FREE BUFFER AVAILABILITY CHECKER 

XFR CHAR FROM MON SMALL BUFFER POOL USRBFR 
MOV CHR TO USER BUFFER 

MOV CHR FROM USER BUFFER TO DRIVER USING XRB 
UPDATE XRB 

IB STATUS TO SET FROM ISR 

I/O COMPLETE EXIT & ALSO RETURN ERROR CODE 
CAN't DO NOW - DO LATER 

ISR EXIT 


DIGITAL EQUIPMENT CORPORATION 


ADDING A DEVICE DRIVER TO RSTS V5B 
KKK IKE KER ERE KEKE REE KEKE KEKEE 


Introduction - There exist hooks in the RSTS Monitor for adding 


CSeneral 


3 device drivers to the system. Including a device driver 
requires a re-system generation. Two slots are presently 
used for optional devices. XXX is used for pseudo 
keyboards and 222 is used for the 278 Emulator. Therefore, 
the YYY slot is recommended. 


Philosophy - There are two types of device drivers in 
RSTS/E. Devices capable of NPR transfers move data 
directly from the device to the user data buffer. 
This requires the user to be locked in core during 
the transfe~. 


Slower character oriented devices perform data transfer 
to monitor buffer space, while the job is not resident in 
core. Later the data is tranferred from the monitor 
buffer area to the user buffer. Monitor buffers can 

be extracted from the small buffer pool or can be 
special buffers defined in the read/write portion 

of the monitor. Small buffers are 16 words long, 

the first word contains a link word leaving room . 

to store 39 characters of data. Monitor subroutines 
are available for storing and extracting characters 
from these buffers. Pointers to these buffers and 
current position within these buffers is stored in 

a device data blocks for a particular device. 

If special buffers are defined within the monitor, 

the device driver must manager that buffer. 


Definitions - 


FIRQB - File Request Queue Block 


The "FIRQB" is the means for queueing request for 

the file processor. Opening and closing of devices 
and files are processed this way. The FIRQB is 
actually a parameter block which contains information 
pertinent to the request. 


XRB = Transfer Control Block 


Reads and writes are initiated by the Run-Time System. 
The Monitor, not the file processor handles the request. 
Information such as byte count and transfer address 

is passed in the XRB. A copy of the XRB exists in both 
the user image and the monitor. 


DDB 


Device Data Block 


There exists one DDB per device unit. The format 
for this device is basically the same for various 
devices. However, each device uses various words 
and bits differently. 


J23: ~ A 
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for legal device names. 


DEVNAM: "DP ;IF RP IS SYSTEM DISK 
ge DF 
i DK 
u KB 
iii DT 
"LP 
"PR. 
“pp -* 
"CR 
"MT 
XXXXXX 
YYYYYY 
ZZLLZZZ 
-1 ;END OF TABLE 


IOB = IO Block. The login procedure includes setting up 
the job data structure, which consists of 3 small 
buffers from the free small buffer pool. 

One is used as a job data block, the first word 
of which points to another small buffer which is 
used as the IOB for thisjob. The IOB consists 

of one entry per I/O channel. 

The third small buffer which is pointed to by the 
job data block is a work block for FIRQB's and 
XRB's. 


JBSTAT/JBWAIT = the monitor contains a Job Status (JBSTAT) 
and Job Wait (JBWAIT) Table. Each table contains 
‘a one word entry per job. The JBWAIT table indicates 
job's waiting for a completion. The JBSTAT 
table indicates function completions. 
The followince describes the format of a one 
word entry in both of these tables. 


JSDSK = 1 DISK WAIT 

JSKEY = 2 KB: WAIT 

JSDTA = 4 DT: WAIT 

JSLPT = 19 LP: WAIT 

JSPTR = 29 PR: WAIT 

JSPTP = 49 PP: WAIT 

JSCDR = 199 CR: WAIT 

JSMTA = 299 MT: WAIT 

JSXXX = 499 XX: WAIT 

JSYYY = 1999 YY: WAIT 

JSZZZ = 2969 ZZ: WAIT 

JSTEL = 4992 KB: TELEPRINTER WAIT 
JSFIP = 1899 FILE PROCESSOR WAIT 
JSTIM = 2969 -SLEEP WAIT CONDITION 
JSNUL = 49668 SMALL BUFFER WAIT CONDITION 


Overview - 


A device driver in RSTS requires the following 
main sections. | 


1. Open routine 


pa-3 


2. Close routine 

3% Level 3 service routine - read/write processor 

4. Interrupt Service Routine 

For each device driver in the RSTS monitor, there exists 


a handler index. These are assigned in the following 
manner: 


g disk 

2 keyboards 

4 DECtape 

6 line printer 

18 paver tape reader 
12 paper tape punch 
14 card reader 

16 magtape 

20 XXX device 

22 YYY device 

24 ZZZ device 


The RSTS monitor contains common code for processing OPEN, 
CLOSE, READS and WRITES (GET, PUT, INPUT, PRINT) for de- 
vices. The open and ciose code is contained in a module 
named "OPN". Reads and writes to slower character oriented 
devices perform data transfers to monitor buffer space, 
while the job is not resident in core. Later the data is 
transferred from monitor buffer space to the user buffer 
area. Monitor buffers are extracted from the small/large 
buffer pool or defined as part of the device driver. Reads 
and writes to devices are processed in the module "MON". 
Completion of these functions depends on three dispatch 
tables which are accessed using the handler index. 


ie Open table (OPNTBL) - this table contains one slot 
for every device, which contains the address 
of the open routine for that device. 


2% Close table (CLSTBL) - similar to open table only 
contains pointers to close routines for every 
device. 

3. Service table (SERTBL) - contains addresses for device 


service routines which handle reads and writes. 


Open “PR:" as file 13% 


The above BASIC PLUS command opens the paper tape reader on 
channel 1. This statement causes a file processor request to 
be issued. The code executed as a result of this request 

can be either resident or non-resident. One of the system 
generation questions asks whether you want resident file 
handling. This resident file handling includes the open 
code. 


The open code functions as described below. 


1. Check channel specified. If some device or file is 
already open on this channel, abort with an 
error message. 


2. Check device name specified with device name table. 
If this device does not exist, abort with a 
no device error, the unit # is also verified. 


3. Check DDB for device owner. If this job already owns the 
device, exit. If another job owns the device, 
abort with an error message. Otherwise update 
the DDB with the following information. 


l. Current time 

- Clear status bit 

. Set access count to 9. 
- Set job #. 


4. Using the handler index which exists in the DDB, calculate 
the address for the appropriate device open routine. 
Now, execute the device open routine as a subroutine. 


5. Increment access count in DDB. 


6. Set up DDB address in IO block entry for specified 
channel. 


CLOSE 

1. Remove entry from IO block entry for this channel. 

2. Using handler index from DDB, calculate address for 
appropriate close routine. Execute CLOSE routine 
as a subroutine. 

3. Decrement access count. 

4.. If device is not in use update DDB and save device time 


job data block for the job who just used the 
device. 


READ/WRITE Processing 


-USERIO - associated with this routine is the transfer control 
block (XRB). The XRB contains the following information: 


{2S an 


1. Length of I/O buffer in bytes. 
2. Byte count for transfer 
3. Pointer to buffer start for transfer 
4, Channel # for transfer 
5. Starting device block # for transfer 
6. Wait time for tty input 

ISERIO performs the following: 


1. Check that specified channel is open. If not open abort 
with an error message. 


w) 


Check DDB for legal access (read locked and write locked 
status). Insure we are not reading from a line printer. 
If access is illegal, abort with the error message 
"PROTECTION VIOLATION". 


3. Set appropriate JBWAIT condition for this job. 


4, Map the user buffer in kernel Space with the monitor. 
This is done to allow core to core data transfers 
between the users buffer and monitor buffers. 


5. Using the handler index calculate the address for the appropriate 
level 3 service routine. Then jump to the appropriate 
device service routine. 


USERIX 


This is essentially a different entry point to "USERIO". It is 

used for redoing I/O. If for some reason I/O was stalled by the 
or a special data buffer can be defined inthe read/write 
portion of the monitor. 

used for redoing I/O. If for some reason I/O was stalled by the 

driver exiting to IOREDO, the I/O request would later be processed 

through this entry. 


RELATED MONITOR ROUTINES AND ENTRIES 
KKK KK KKK KKK KKK KKK KEKE EKER KEKE KERER 


An understanding of the following monitor routines and entry points 
is necessary to implement a driver. Including any of the following 
requires an appropriate global definition (.GLOBL). 


REGSAV 

FETCH 

STORE 

CLRBUF 

FREBUF 

CHRUSR 

CHRU#1 

TTYS2@ AND TTYS39 
RESRT4 


IOREDO 
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REGSAV- 


FETCH - 


STORE - 


CLRBUF - 


FREBUF - 


CHRUSR - 


CHRU#1 - 


TTYS26 - 


TTYS39 - 


RESRT4 - 


IOREDO - 


IOEXIT - 


IOFINI - 


Saves registers §@ through 5 on the stack. Used by 
the interrupt rvi outi 

get character from the small buffer chain when 
ready to output a character to the device. 


takes a specified character and stores it in the 
small buffer chain, updating appropriate pointers 
and counts. Also attempts to allocate another 
small buffer if no free space is available in 
existing buffers. 


clears small buffer chain which is being used for 
either input or output, updates appropriate 
counters, pointers, and return buffers to the 
free buffer pool. 


free buffer availability checker. If there are not 
at least 18 small buffers left in the system, return 
a negative indication. If this device has not used 
its quota return position indication. 

Else if not at least 29% of total free in system 
return negative. 

Else if this device has 25% or more of total system 
small buffers return negative. 

Else return positive. 


transfer a character from the monitor small buffer psoi 
to the users buffer. 


move specified character to the user buffer. 


move a character from the user buffer to driver using 
information in the XRB. 


update pointers and count in XRB. 


common return from interrupt processing at ievels 
4 through 7. If the interrupted level is 
processor level 3 or higher issue an RTI. 
Otherwise, look for other monitor routines to 
start up. 


signal I/O redo. This exit is used to indicate 
I/O cannot be serviced at this time, but should be 
redone later. 


exit saying I/O complete. Used by level 3 service. 
Also used to return an error code. Most common 
error types are: 


EOF end of file 

DATERR general parity error 
HNGDEV device is hung 
NOROOM device is "full" 


subroutine called from Interrupt Service Routine. 
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"IOREDO". 


Save and Restore Registers 


CALL: 


CALL: 


JSR R5,REGSAV 

exits with SPSRg,R1,R2,R3,R4,R5 

and the carry bit unchanged 

JSR R5,REGRES 

pops R@-R5 from stack leaving carry bit 
unchanged 


Character Fetching Routine 


CALL: 


R1->DDB 
JSR R5,FETCH 
4 OFFSET 


wae RETURN [C=1 FOR NO CHARACTERS LEFT] 


OFPSET=DDINFITP for anput butter 
OFFSET=DDOUT+FP for output buffer 
character is returned in R2 


R4 is clobbered 


Character Storing Routine 


CALL: 


where: 


R1->DDB 

R2=character to store 

JSR R5,STORE 

+ OFFSET 

eee - RETURN [C=l1 FOR NO ROOM LEFT] 
OFFSET=DDINP+FP for input buffer 
OFFSET=DDOUT+FP for output buffer 
R3,R4 are clobbered by the process! 


Buffer Chain Clearer Routine 


CALL: 


where: 


R1->DD38 

JSR R5,CLRBUF 
+ OFFSET 
eee RETURN 


OFFSET=DDINP+EP for inputbuffer 
OFFSET=DDOUT+EP for output buffer 

R3 is clobbered by the process: 

CPU priority raises to 5 during process 


Free Buffer Availability Checker 


CALL: 


where: 


R1-*DDB 
JSR R5,FREBUF 
+ XXX .OB 


oe RETURN [C=l IF NOT ENOUGH] 
XXX.OB is BC count fudge factor 


Character from Buffer Pool to User Routine 


CALL: 


CALL: 


R1->DDB 
R5=—®XRB @ XRLOC 
JSR R#,CHRUSR 


cee RETURN IF NO USER BUFFER ROOM LEFT 
eee RETURN IF ROOM FOR MORE 
eee RETURN IF NO BUFFER POOL CHARS LEFT 


SAME REGISTER AS 6. 


JSR R#,CHRUG1 
cee RETURN IS NO USER BUFFER ROOM LEFT 


lA -S " 


Bs return if room for more 
R3 is clobbered by both routines 


8. Character from User; IOF; Return 
CALL: R5=®XRB @ XRLOC 
JSR PC,TTYS29 
coe RETURN 


Character in R2 
Check C bit and Wait or Adjust Counts and Return 


CALL: R5=® XRB @ XRLOC 
CARRY=1 means buffering failure 


JSR PC,TTYS39 
ee RETURN [only if no failure] 
R5 NOW ->XRB @ XRBC 
o Return from Interrupt 
CALL: JMP RESRT4 
18. Re-Do the I/O Routine 
CALL: JMP IOREDO 
Els Exit from I/O Completion 
CALL: JMP IOEXIT 
Exit from I/O Completion with an Error 
CALL: MOVB #HNGDEV, @IOSTS 
JMP IOEXIT 


HNGDEV can be replaced with DATERR, EOF, NOROOM, ETC. 


Routine to Set Status Bits in JBSTAT 
CALL: R1=-*DDB 


JSR R5,IOFINI 
+ JBSTAT BITS TO SET 
oes _ RETURN 


JOB # is in R4 on return 
REGISTER DEFINITIONS FOR OPEN, CLOSE, AND SERVICE 


The following registers are set up before entering the 
following sections of the device driver. 


OPEN 


R1I-»DDB 
R4@FIRQB 


The following instructions should be included in the 
OPEN subroutine to transfer the default buffer size 
and flag value to the Run-Time System. 


MOV #???,FQBUFL[R4) ;SET DEFAULT BUFFER LENGTH 
THIS IS ALSO THE MINIMUM 
BUFFER SIZE (RECORD SIZE} 
BUFFER SIZE (RECORDS SIZE} 
MOV #YYYFLAG,FQFLAG(R4) ;SET FLAG VALUE 
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CLOSE 
R1l=*DDB 
R4FIRQB 
R5<®DDB 


“aad/Write Service 


R@ - 2 for read, 4 for write (access verified) 
Rl - FCB/DDB pointer 


wm 
Nh 
I 


handler index 


R3 - XRB pointer(@ XRLEN) 


ve) 
cS 
! 


kernel window address to user's buffer 


R5 - byte count pointer (XRB @ XRBC) 


ot me 


The following macros must be defined in the device driver 


i VECTOR ORIGIN,ADDRES,PRI 


where: 


ORIGIN is the address of the interrupt vector 
for this device | 


ADDRESS is the address of the interrupt service 
routine for this device 


PRI is the priority at which the interrupt 
service routine should run. This is actually 
the value which goes into the second word 

of the interrupt vector. The following 
symbols were defined in the module kernel 
which is assembled with device driver and may 
be used here. 


PR7 - defined as 340 to indicate 


priority 7. 

PR6 - defined as 39% to indicate 
priority 6. 

PR5 - defined as 2498 to indicate 
priority 6. 

PR4 - defined as 288 to indicate 
priority 4. 

2. SSSDEV DEV,STS,IBC,OBC,SIZ : 


where: 


DEV indicates the device. For example, 
YYY would be used if adding a YY device 
driver. 


STS indicates status. The following symbols 
defined in kernel may be used here. 


DDWLO - device is write-locked 
FLGPOS - file's position needs checking 


FLGFRC - file is force type, not blocked 
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Run-Time System on output even 
if the data buffer in the job 


is not full). 
FLGKB - file is keyboard type 
FLGRND - file is random access type 
DDRLO - device is read-locked | 
DDNFS - device is non file serusenees 


IBC is the number of small buffers allowed 
for input. 


OBC is the number of small buffers allowed 
for output. 


SIZ indicates line size. 


NOTE: Although IBC and OBC specify the number 
of small buffers a device may allocated, 
buffer management will allow a device to 
allocate more buffers if there are a suf- 
ficient number of free small buffers in 
the system. 


SSSFLG DEV,Ql 


where: DEV indicates the device. For examrle. 
YYY would be used for a YY device. 


Ql indicates the appropriate flag values 
for a device. Any of the following symbols 
may be OR'ed together. 


DDNFS - file is non-file structured 
DDRLO - file is read locked 
DDWLO - file is write locked 


FLGPOS - file's position needs checking. 
Used by terminal and line printer drivers. 
Keeps vertical and horizontal positions. 
Checks control characters. 


FLGFRC - file is force type, not blocked. 
Only significant for output devices. 

Used for character oriented devices, data 
is transferred from the Runtime System 
without waiting for the buffer to fill up. 
Should always be set for input only devices 
so that error messages will be returned 
immediately. 


FLGKB - file is keyboard tyre 


should indicate device is human oriented device 
not used by the system, Meant tc be checked 
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js cae ie by the user by checking the status 


FLGRND - file is random access type 

The Run-Time System will not accept the 
"RECORD" option. It will return an error 
message instead. 


t* 


4. ORG YYYCTL - Only necessary if a portion of the driver must 
be read/write. Otherwise, all code 
in the driver must be read only code. 
This line of code must be included if 
you want to add your flag words and 
buffers. 


INCORPORATING A NON-STANDARD DEVICE DRIVER IN RSTS/E 


The following modifications to the system generation procedure 
are required. 


Azter answering all SYSGEN questions the following message 
appears on the terminal. 


SYSGEN:IF YOU HAVE ANY SPECIAL REQUIREMENTS WHICH REQUIRE 
SYSGEN: EDITING EITHER THE CONFIGURATION FILE (CONFIG.MAC) 
SYSGEN:OR THE BATCH GENERATION FILE (SYSGEN.BAT), ABORT 
SYSGEN:NOW BY TYPING "CONTROL/C" AND THEN "TE". RESUME AT 
SYSGEN:THIS POINT BY TYPING "BATCH SYSGN2". OTHERWISE, 
SYSGEN: TYPE "CO" TO CONTINUE WITH SYSTEM GENERATION: 


At this point the files "CONFIG.MAC" and "SYSGEN.BAT" should be 
modified. Therefore type "CONTROL/C" and then "TE". 


The configuration file (CONFIG.MAC) must be modified to 
include the following parameters. 


YYYY11=N ;N=Number of units for this device 
YYYYYY="AB ;device name, must not conflict with existing 
devices (DT, MT, PR, etc.) 


The batch stream (SYSGEN.BAT) must be modified to include 
assembly and linking of the new driver. 


"SYSGEN.BAT" includes the following commands for assembling 
TBL and TTY. A command for assembling YYY must be included, 


SRUN MACRO 
#TBL,TBL/CR<CONFIG,COMMON, KERNEL, TBL 
SRUN MACRO 
#TTY , TTY/CR<CONFIG,COMMON, KERNEL, PKB, TTY 
xk SRUN MACRO 
Rael #YYY, YYY/CR<COMMON , KERNEL, YYY 


A command must also be added to the link the driver to RSTS. 
SRUN LINK 
#UPDATE 


#NOFAIL 
# PATCH 
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ARR #YYY 
#RSTS/IN:OPN:SND/E 


After including the above modification, 


"BATCH SYSGN2". 
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ERRLOGGING AND CRASH ANALYSIS 
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FRAP LOCGING ON RSTS/E 


RH11/RP§4 ERROR LOGGING IN RSTS/E 
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RSTS/E error logging uses 13 word packets. The first 4 wards 
standard for all packets. The first 4 words < in: 


ERROR CODE 

DATE 

TIME (in seconds) 
JOB 


PROCESSOR STATUS 


RP#4's use 6 of the remaining 9 words to save the ECL 0vLaG: 


RHCS1 RH11 Control Status 1 
RHCS2 RH11 Control Status 2 
RHDS RH11 Drive Status 

RHER RH11 Error Status 

RBDC RP#4 Desired Cyiinder 
RBDA RP#4 Desired Track/Sector 
RBOFF RP@4 Offset 


.l of the remaining 3 words is used as follows: 


11/79: RHBAE RH7$ Address Extension 
RHCS3 RH7% Control Status 3 
Non-11/7@: Flag indicating no RHBAE ox RECS? 


The final 2 words are used as follows: 
RBER2 & RBER3 are @ 


Flag indicating RBER2 
Flag indicating RBER3 ° 


iid 
RN 


RHWC RH11 Word Count 
RHBA RH11 Bus Address 
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ERROR LOGGING ON RSTS/E 


at ae 


4 


March 21, 1975 


RBER2 # 9g 

RBER3 = @ 

Flag indicating RBER3 = g 

RBER2 RP@4 Error Register #2 
RHBA RH11 Bus Address 

RBER2 = @ 

RBER3 # @g 

Flag indicating RBER2 = g 

RHWC Bel) Hora Sue. 

RBER3 RP§4 Error Register #23 


RBER2 & RBER3 # @ 


RBER2 RP#4 Error Register #2 
RBER3 RP#4 Error Register #3 


3-2. 
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bWercieeNaeaeenase: 


THERE EXISTS A CORE TABLE CALLED "ERRTBL" WHICH HOLDS TEN i12ORD 


Dre rMal FNTRYES, THE {teNety of TurS Taale Is DEFINED BY THE 


PARAMETER NERRSIZ" WHICH APPEARS IN THE CONFIGURATION FILE 
,CONFIG,MACt AND DEFINES THE NUMBER OF TABLE ENTRIES, 


\-&RLOG CREATES A TABLE ENTRY ON THE STACK, COMPARES THIS ENTRY 
FOR A POSSIBLE DUPLICATION IN THE TARLE "ERRTALY. IF A 
DUPLICATION IS FOUND, 4 REPEAT COUNT IS INCREMENTED IN THE 
ALREADY ExISTING TABLE ENTRY AND THE ROUTINE IS EXITED, 


A MORE DETAILED DESCRIPTION FOLLOWS; 


ERRLOG FIRST DECIDES WRKETHER AN FRROR IS BEING LOGGED 
OR THE SPECIAL Sv¥S FUNCTION TO FIP (#15) FOR ERRLOGGING 
IS BEING EXECUTED, IF A PARAMETER OF @ IS SPECIFIED IN 
THE SYS FUNCTION, ERRLOG INTERPRETS THIS AS AN ANNOUNCEMENT 
THAT THIS JoB IS THE ERROR LOGGER AND SHOULD BE MADE 
FUNNABLE EVERY TIME AN ERROR I8 LOGGED, ERRLOG RECORDS 
THE JOB NUMBER AND JMB DATA ADDRESS OF THIS PARTICULAR JOB, 
en 

THE PARAMETER IS NON@ZERO, TABLE ENTRIES FROM "ERRTBL" ARE 
“PASSED BACK TO THE USER, ERRCPY USES THIS SYS FUNCTION 
TO EXTRACT ENTRIES FROM CORE AND COPY THEM 10 THE DISK FILE 
"SERRLOG,.FIL", 


IF AN ERROR IS BEING LOGGED, A 12 DECIMAL WORD ENTRY IS 
CONSTRUCTED ON THE STACK, THE FORMAT FOR THIS ENTRY FOLLOWS, 


“WORD @ LOW BYTE CONTATNS error code 
The HIGH BYTE CONTAINS A REPEAT COUNT 


WORD BITS 4 THROUGH 15 CONTAIN THE DATE 
BIT @ IS THE HIGH RIT OF THE TIME IN HRS/MINS 


WORD 2 BITS 6 THROUGH 15 ARE THE LOW BITS OF THE TIME 
IN HRS/MINS ; 
BITS @ THROUGH 5 REPRESENT SECONDS TILL MIONIGHT 


XRD J BITS 6 THROUGH 15 REPRESENT THE PSW IN PACKED FORMAT 
BITS @ THROUGH 5 REPRESENT THE JOB NUMBER 

WORD 4 VIRTUAL PC : 

WORD 5 | eHIGH 12 BITS OF ABSOLUTE PC, RIGHT JUSTIFIED 

WORD 6 

THROUGH 

WORD {1 VARIOUS REGISTERS, DEPENDENT ON ERROR YYPE 


# INCLUDED FOR THE FOLLOWING ERRORS ONLY 
TRAP THROUGH 4 
RESERVED INSTRUCTION TRAP 
MEMORY MANAGEMENT ERROR 
PARITY ERROR 


YWERFAIL ANP TRAP THOUGH @ SAVE NOTHING BEYOND WORD 3, 
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ASSUMED AND THE PSw ENTRY IS SEY TO ALL 1'S, 


T BIT SET 
~ UNUSED RIT SET 
CURRENT OR PREVIOUS MODE SUPERVISOR "@1" 


THE PSW IS PACKED INTO BITS 6 THROUGH 15 OF WORD 3 IN THE 
“OLLOKWING MANNERS 


ee & ae Go) {sCURRENT MODE USER 
BSCURRENYT MODE KFRNEL 
BIT 44 {®PREVIOUS MODE USER 
@ePREVIOUS MODE KERNEL 
Bij 1lilel35 PRIORITY 
BIT i@ GENER.L REGISTER SET, 4 IF 11745 
BI. 9 N 
BIT 8 zZ 
BIT 7 V 
BIT 6 C ‘ 


CALCULATING ABSOLUTE (PHYSICAL) ADDRESS FROM VIRTUAL ADDRESS? 


Ne BITS {5813 OF VIRTUAL ADDRESS 
XXX8 BITS 12-06 OF VIRTUAL ADDRESS ° 


CcPAR N) # XXX s HIGH ORDER 12 BITS OF PHYSICAL ADDRESS 


LOW ORDER 6 BITS ARE THE SAME IN BOTH PHYSICAL AND 
VIRTUAL SPACE, 


MISSED ERRORS 


IF "ERRTBL" IS FULL AFTER A NEW ENTRY YS CREATED ON THE STACK, 
AN EXISTING ENTRY WILL BE OVERLAYEN, BEFORE THIS WAPPENS, 

THE REPEAT COUNT PROM THE TARLE ENTRY ABOUT TO BE LOST 18 
ADDED TO A COUNTER WHICH IS ALSO INCREMENTED { FOR THAT ENTRY, 
THE CONTENT OF THI§ COUNT IS LATFR PASSED TO YKE USER AS IF 

Iy wERE A TABLE ENTRY, THIS ENTRY CONTAINS ONLY TWO WORDS, 


WORD @ a 

WORD 4 NUMBER OF MISSED ERRORS 

IF THIS COUNT REACHES #1, IT IS RESET TO THE HIGHEST POSITIVE VALUE, 
THE "ERRTBL" COULD OVERFLOW IN THIS MANNER, IF "ERRCPY,BAS" IS 


“NOT RUNNING, OR ERRORS ARE BEING LAGGED AT AN EXTREMELY RAPID 
RATE, 


LY. 
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THE FOLLOWING 16 ERROR TYPES ARE LOGGED AND DISPLAYED WITH 
THE ERROR LOGGING FACILITIES IN RSTS/E, 


DECTAPE 

RFi4 

RCil 

RK11 

RP{14 

MAGTAPE 
KEYBOARD 

TRAP THROUGH 4 
POWER FAIL 


TRAP THROUGH @ 
RESERVENM INSTRUCTION 

JUMP TO @ 

RUN=TIME SYSTEM ERROR (CHECK=sgyM ERROR) 
MEMORY MANAGEMENT | 

DH1it 

PARITY 


“HE INFORMATION DISPLAYED BY ERRDIS REGARDING MOST Errors fg 
JELF@EXPLANATORY, THAT IS HARDWARE REGISTERS ARE OISPLAYED, 
SELECT ERRORS CAN BE CAUSED BY REFERENCING A UNIT # WHICH 

IS NOT PHYSICALLY SELECTED, 


THE DISPLAY OF TWO ERROR MESSAGES WHICH ARE NOY OBVIOUS 
ARE DISCUSSED BELOW, (DHL AND CHECKSUM) 


1, CHECKSUM ERRORS 


THE FOLLOWING REGISTERS ARE DISPLAYED, SAMPLE VALUES ARE YN UBED 


TO HELP EXPLAIN THEIR MEANING, 


xUISARQ 2400 USER IMAGE BASE 240Ge1GA = 24GnR% 
UISAR7 6000 YOP OF BASIC =z BAAAe1A06290GG & B2AguD 
SIZE 5 USER IMAGE sf7F 
RTS SIZE 16 RUN@TIME SYSTEM SIZE IN OCTAL 
R3 
R5 
eeked eee eee eee OF 
€ c 
e * * 
* * 
* * 
« « 


tekeo eee eee 240GAG 
* USER IMAGE 5K « 
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LARA Lit Tr tT 
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« BASIC + e 
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& * 
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1, TRUE CHECKSUM, 
R3<>R5 = R3 = CHECKSUM FROM ptsK 
RS 8 COMPUTED CHECKSUM 


THIS ERROR WOULD OCCUR AFTER A RUN OR CHAIN COMMAND, 
THE "PROGRAM LOSTmSORRY" MESSAGE WOULD APPEAR ON A 
USER'S TERMINAL, 


2, R3sR5ag | 
ON 11740 WITH NON@FIS MATH PACKAGE, THE FIS INTERRUPTED, 
ON 11/45 WITH NON@FPP MATH PACKAGE, THE FPP INTERRUPTED, 


3. R3e"FLOAING EXCEPTION CODE" g RSe"FLOATING EXCEPTION ADDRESS" 
oe waves Sire Mart FACRAGE, THE "FLOATING EXCEPTION CODE" 
WAS ILLEGAL, 


THE MESSAGE "FLOATING POINT ERROR PROGRAM LOST=SORRY" SHOULD 
APPEAR AT SOME USER'S TERMINAL AT THE TIME OF THIS FRROR 


FOR CASES 2, AND 3,, 


NOTE’ SEE 11/45 PROCESsOR HANDBOOK FOR DETAILED FPP INFORMATION 


* USER INSTRUCTION SPACE ANDRESS REGISTER (PAR) 
UISAR@ THROUGH YISARS ALWAYS MAP USER IMAGE, 
UISAR4 THROUGH YISAR?7 ALWAYS MAP RUNTIME SYSTEM, STARTING 
WITH 7 FOR THE TOP SEGMENT, 


2, DH ERRORS 
THE INFORMATION DISPLAYED INCLUDES THE FOLLOWING, 


JOB 
PSW 
wCH EB 
CSR ADDRESS 
CSR CONTENTS 
SILO STATUS 
LINE PARAMETER REGISTER 
CURRENT ADDRESS REGISTER 
BYTE COUNT REGISTER 
BUFFER ACTIVE REGISTER 


THE FOLLOWING EVALUATION PROCEDURE SHOULD BE FOLLOWED: 
EXAMINE CSR CONTENTS, 


IF BIT 14 IS SET THEN THYS WAS A SILO OVERFLOW, THE 
INFORMATION IN CH,EB IS MEANINGLESS, 


IF BIT 1@ 18 SET THEN NONMEXISTENT MEMORY, THE INFORMATION 
IN CH,EB IS MEANINGLESS, 
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OTHERWISE, CH,C® SHOULD BE EXAMINED, | 

IF RIT 14 IS SET THEN THERE WAS A DATA OVERRUN, 

IF BIT 12 IS SET, INDICATING PARITY ERROR THE LINF 
PARAMETER REGISTER SHOULD RE EXAMINED FOR BIT 4 
WHICH Ig THE PARITY ENABLE INDICATGR, THIS CASE 
SHOULD NEVER OCCUR FOR PSTS/E DOES NOT ENABLE 
PARITY ON THE DHi1, KQKEVER, THIS CONDITION HAS 
OCCURRED, THE CAUSE WAS SOLDER SPLASH, 


*CH.ER IS AN ABBREVIATION FOR CHARACTER » ERROR BIT REGISTER 
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IN ORDER TO ANALYZE SYSTEM CRASHES PROPERLY, THE CRASH DUMP~ 
FACILITY MUST BE ENABLED DURING THE START OPTION, AND THE 
CONSOLE SWITCHES MUST LEFT IN AN UPWARD POSITION, 


“HEN THE RSTS/E SYSTEM CRASHES, APPROXIMATELY 12K OF CORE 
~ TLL B86 WRITTEN INTO THE DISK FILE CRASH,SYS UNDER ACCOUNT (8,1). 


“APEE PROGRAMS MUST RE RUN TO FXTRACT THE INFORMATION NECESSAY TO 
“REFORM CRASH ANALYSIS, THESE PROGRAMS WHICH ARE DISTRIBUTED 
with THE SYSTEM LIBRARY ARE THE FOLLOWING? 


ANALYS 
ERRCRS 
ERRDIS 


THE EXECUTION OF THESE YHREE PROGRAMS SHOULD BE INITIATED FROM 
YHE CRASH,CTL FILE, THE FOLLOWING CRASH,CTL FILE EXAMPLE INCLUDES 
THE NECESSARY COMMANDS, 


FORCE KB@e RUN §ANALYS 

FORCE KB@s (0,1) CRASH,Sy8 

FORCE KBAs KB: 

FORCE KB@3 RUN SERRCRS 

FORCE KBs, TEMP, TMP 

FORCE KBQ@: 

FORCE Kats RUN SERROIS 

FORCE KB&, TEMP, TMP 

FORCE KBas KBe 

FORCE KBA@s ALL 

FORCE KB@3 /KILL 

FORCE kB@: RUN SINIT 

SEND 1'M NOW ATTEMPTING To RECOVER FROM A CRASH « 
SEND THANK YOU FOR YOUR PATIENCE,,, 
END 


THE LAST FORCE COMMAND IN THIS EXAMPLE FORCES TKE SYSTEM 

PROGRAM "INIT" TO RUN AGAIN, THIS TIME EXECUTING ALL THE 
COMMANDS IN THE SYART,CYL FILE, THIS ELIMINATES THE NEED 

FOR REPEATING THOSE COMMANDS IN THIS FILE, TKE INTT PROGRAM 
CONTAINS THO ENTRIES, QNE WHICH REQUIRES IT To USE TRE START,CYL 
FILE FOR COMMANDS AND THE OTHER WHICH CAUSES IT To ASSUME 
COMMANDS FROM CRASH,CTL, 


THE INFORMATION QUTPUT BY THE COMMANDS IN THIS CRASH,CTL AND 
THE LOAD MAPS FOR THE SYSTEM ARE THE NECESSARY TOOLS FOR 
ANALYZING CRASHES, 


ied heheheh teh bie hh hE LT TITTLE LLC LATTER CE ETT TCT CTT eT 


NOTE: JOB #'S IN THE CRASH DUMP ANALYSYS MUSY AF CONVERTER FROM 
OCTAL YO DECIMAL AND DIVIDED ry 2 TO CORRESPOND WITH 
JOB #!S IN THE CRASH DUMP STATUS, WHICK JS DYISPLAVEN 
AT THE BEGINNING OF THE CRASH ANALYSIS, NUMBERS UNDER 
"JOBy) NExy" AND “FIJOR" ARE THE JOB # MULTIPLIED Ry o 
IN OCYAL, 


® 
OR re ps Rigs ede ore meng an eT eg eae Pere a ae Se oe me ae te 


1, ERROR CODE = THE FIRST ITEM TO FXAMINE ON THE CRASH ANALYS 
OUTPUT IS THE ERROR CODE, THIS CODE SHOULD CORRESPOND 
TO ONE OF THE FOLLOWING, 


ERROR CODE DEFINITION 
Prete hese Ge 
—¢ (477777) UNKNOWN VECTOR 
m2 (177776) JUMP TO @ 
44 | TRAP 4 
420 TRAP 10 
43 TRAP 250 MEMORY MANAGMENT VinLavtay 
Ag : KERNEL SP STACK OVERFLOW 
46 TRAP {14 PARITY MEMORY ERROR 
Q FORCED DUMP 


IF A DUMP WAS FORCED (COMPUTER HALTED AnD RESTARTED WRITING OUT 
THE CRASH FILE) ALL INFORMATION ON THE CRASH ANALYSIS FROM 
"SAVED R@ TO R5" DOWN TO AND INCLUDING "SER ANDR, REGS*® fs 
MEANINGLESS, FORCED DUMPS OF THIS TYPE NO NOT CAUSE YHE NOFAT(. 
CODE To RE EXECUTED WHICH SAVES THIS INFORMATIQN, fF YOu MuST 
FORCE A CRASH DUMP, YT WOULD BEF MORE ADVISEABLE TO HALT THE 
COMPUTER, EXAMINE THE CONTENT OF LOCATION 4, sc? THIS ADDRESS fA 
‘HE SWITCH ADDRESSES, LOAD ADDRESS, AND HIT START, 


ev, PC AND PSW = THE FIRST Two ITEMS ON THE KERNEL STACK ARE THE 
PC AND PSW AT THE TIME OF THE CRASH, . 


PC = THE LOAD MaPsS SHOULD RE REFERENCED FOR MODULES AND 
GLOBALS wHICH MOST NEARLY CORRESPOND TO THIS pC VALUE. 


PWS » THE PSW SHOULD FOLLOW TRE FOLLOWING FORMAT? 
X XXX XA0 OXX Xax XXX 


&keekewe * 


“ e 1 IF 11745, @ IF 11740 | 


* 
@GAG CURRENT aNn PREVIOUS MODE KERNEL, 
KERNEL CRASH FROM AN INTERRUPT ROUTINE, 


“OOLL CURRENT mone KFFNEL, PREVIOUS MODE USER, 


KERNEL CRASH FROM INTERRIPT ROUTINE OR MONITOR, 


1141 CURRENT ANN PREVIOUS Mang USER, THIS was 
A USER CRASH, THE JOB # UNDER "JOB: NEXT" 
WAS CURRENT, | 


STS/E DOES NOT USE SUPERVISGR MODE, THE PSW SHGULD 
EVER INDICATE SUPERVISOR MODE, 


a ow 
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Se KERNEL SP & SHOULD ALWAYS BE LESS YHAN "FISTAK", THE RSTS/E 
MONITOR UTILIZES THO STACKS3 ONE FOR FIPCFILE PROCESSOR), 
AND THE OTHER STACK FoR OTHER MONYTOR OPERATION, "eISTaKH 
MARKS THE BEGINNING OF THE FIP STACK, "SYSTAK"420 MARKS 
THE BEGINNING OF SYSTEM STACK, AND THE BOTTOM OF LYMIT OF THE 
FIP STACK, THE FOLLOWING HELPS DETERMINE WHAT TYPE OF OPERATION 
WAS BEING PERFORMED, 


SP<"SYSTAK"+20(OCTAL) A KERNEL (MONITOR) OPERATION WAS IN 
PROGRESS, THE JOB # UNDER "JOB) NEyT" 
WAS THE JOB BEING PROCESSED AT THE 
TIME THE SYSTEM CRASHED, 


SP>"SYSTAKMS20(OCTAL) A FIPCFILE PROCESSOR) OPERATION WAS IN 
PROGRESS, THE JINR 4 UNDED vee vane 
DETERMINES WHICH JOB WAS IN A FILE 
PROCESSING STATE, 


IF THIS CASE IS TRUE THE INFORMATION 
UNDER "FYRARNCFILE REQUESY QUE BLOCK) 
AND/OR "XRR" (TRANSFER CONTROL BLOCK) 
SHOULD BE FXAMINED, (REFER To V5 §,W,S, 
NOTES FOR FIRB And XRB FORMATS) 


NOTES W"FISTAKS RQ "SYSTAKM ARE GLORALS IN THE <LOWCOR> 
SECTION OF THE RSTS,LDA LOAD MAP. 


4, KERNEL 4DOR, REGISTERS - KERNEL ADDRESS REGISTERS @ THROUGH 5 
ARE USED TO MAP THE MONTYOR, REGISTER 6 Is USED BY YHE 
MONITOR TO MAP & PORTION OF THE USER IMAGE FOR TRANSFER 
OF THE DECTAPE BUFFER FRoM MONITOR To USER SPACE‘ REGISTER 7 
IS USED TO MAP THE I/o PAGE, 


5S, USER ADOR, REGISTERS » USER INSTRUCTION SPACE ADDRESS REGISTERS 
B THROUGH 3 APE USED TO MAP THE YSER IMAGE, REGISTERS 
4 THROUGH 7 MAP THE RUN@TIME SYSTEM, 


6, KERNEL DESC, REGS 
USER DESC, REGS, = REFER TO PAGE 2-9 oF THE KT11 MEMOQpy MANAGEMENY 
‘ UNIT MAINTENANCE MANUAL (DEC™iL=HKTBeD), 


FORCED SYSTEM CRASHES 
hh Pee P ELA ES oo oo 
TWO FORCED CRASHES EXIST IN THE RSTS/E MONITOR, 
1. IN THE MODULE FIP, AT "FIPERRIG34 
TRE pISk DRIVER RETURNING AN ERROR OURING ONE OF THE FOLLOWING? 
1, WINDOW TURN oR DISK FILE EXTEND, 
2. READING NON@RESIDENT Cone NECESSARY FOR A MAGYAPE 
OPEN, CLOSE, ZERO, oR CATALOG, 
3, READING NON@=RESIOENT CONE NECESSARY FOR A DECTAPE 
OPEN, CLOSE, ZERO, OR CATALOG, 
THE DISK ORIVER ALWAYS RFTURNS THE FRROR RECAUSE THE 


DISK DRIVER Is PERFORMING YKF DISK CPEPATIONS WRICH 
HANOLE MAGTAPE AND DECTAPE OVERLAYS WHICH RESIDE ON 


DISk, 
/3-/O 


FIVE ATTEMPTS ARE MADE BEFORE FORCING THE CRASH, 
THESE ERRORS SHOULD BE LOGGED IN THE ERROR LOG FILE, 


2, IN MODULE MTA, AT <MTACHK>41(6 


IF THE CURRENT MEMORY ADDRESS (MTCMA) OR THE WORD COUNT 
(MTBRC) YS CLOBBERED, THE SYSTEM FORCES A CRASK, 


#*eeBOTH OF THE FORCED CRASHES DESCRIBED AROVE WILL SHOW UP 
AS TRAPS THRU 4, 


THE FOLLOWING INSTRUCTION IS ALWAYS USED TO FORCE A CRASH, 


(PCad) 5737 
(PC=2) 1 
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2780 


DIGITAL EGUIPMENT ToORrosLaTION, 


DESCRIPTION: 2780 Information 


RSTS/2780 is a software package which enables a suitably equipped 
RSTS/E system to-act as a very powerful remote job entry (RJE) 
terminal. Using RSTS/2780, RSTS/E users may queue data and/or 
job control files for transmission to one of IBM's remote job 
entry packages (HASP, ASP, DOS/POWER or RJE), or to another 
PDP-1l based system. RSTS/2780 accomplishes this by appearing 

to a point-to-point synchronous data-link as an IBM 2780 Model 

1 Data Transmission Terminal. The 2780 is supported by all of 
the above-mentioned IBM programs, as well as being able to communicate 
with another 2780. Thus, RSTS/2780 emulating the 2780 a 
communicate with the other PDP-11 based 2780 emulators (Core-2780, 


DOS-2780, RSX-11D/2780 or another RSTS/2780). 


RSTS/2780 operates at data rates of 4800 bits per second over 
switched or private facilities using Bell System series 208 modems 
or their equivalents, or at 2400 bits per second on private lines 
and 2000 bits per second on switched lines using Bell System series 
201 modems or equivalents. The Bell System 801 Autocall unit is 


not supported. 


When communicating with an IBM system RSTS/2780 will operate 
using either a 2701 Data Adapter, a 2703 Transmission Control 
Unit, a 3704 or 3705 Transmission Controller, or a System/370 
Model 135 Integrated Communications Adapter. The RSTS/2780 system 


itself uses either the DU11 or the DP1l synchronous interfaces. 
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DESCRIPTION: 2780 Information (Cont'd) 


RSTS/2780 consists of two software components; a driver for the 
DP1l1 or DU11 synchronous data-link interface which is linked into 
the RSTS/E Monitor, and a control. program which manages the flow 
of data to and from the link. The control program, written in 

the BASIC-Plus language, provides both interactive and spooled 
modes of user interface. In interactive mode the system operator 
establishes the data-link and specifies directly the files to be 
transmitted to the remote system, as well as destination of re- 
ceived data. In queued mode, the control program transmits files 
as they are queued by RSTS/E users using the standard RSTS/E CUSP. 
Received data is stored in operator-named RSTS/E files; a seperate 
RSTS/E file for each received data file. The system automatically 


updates the name extension for each received file. 


RSTS/2780 communicates with an IBM system in a standard 2780 
format, transmitting logical records of 80 or fewer characters 
and receiving logical records of up to 132 characters. Blocks 
may be up to 400 characters in length. When RSTS/2780 is 
communicating with another DIGITAL 2780 emulator, a general mode 
of operation permits transmission as well as reception of 132 
character logical records. In either case, both transmitted 

and received files may be considered to be ASCII, in which case 
an EBCDIC to ASCII (or vice versa) translation is performed, or 
binary, in which case the data is stored or transmitted untrans- 
lated. All data-link control characters are supplied and stripped 


automatically by the RSTS/2780 software. 
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RSTS/E 2780 


RSTS/2780 enables RSTS/E (VO5B) users to queue data and or 
job control files for transmission to one of IBM's Remote Job 
Entry packages (HASP, ASP, DOS/POWER, or RJE) or to another 


PDP-11 based 2780 system. 


RSTS/2780 can be used in either an interactive or a spooled mode. 
In the interactive mode, the system operator establishes the 
data link and specified directly the files to be transmitted as 
well as the destination of the received data. In the queued 
mode, the control program transmits files as they are queued 

by RSTS/E users using the standard RSTS/E CUSP. Received data 


is stored in operator-named RSTS/E files. 


PDP-11 - A valid RSTS/E or RSX-11D configuration with at least 
48K words of memory, plus... | 
Oo a synchronous line interface 
(DP11 or DU11) 
Oo a communications arithmetic element 
(KG11-A) 
Oo a system clock (KW11-L or KW11-P) 
IBM - Hither a 2701 Data Adapter, a 2703 Transmission Control 
Unit, a 3704 or 3705 Transmission Controller, 
or a System/370 Model 135 Integrated Communications 
Adapter. 
Modems - Bell 208 or equivalent (4800 bps over switched or 
private facilities) or 
Bell 201 or equivalent (2400 bps over private lines 


or 2000 bps over leased lines). 
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Questions and Answers 


Answers to some of the more frequently asked questions on the 


two new 2780 packages are presented below: 


Question: Can one Remote Computer System like RSTS-2780 communicate 
with another; say, DOS-2780? 


Answer: Yes. 


Question: Can multiple Remote Computer System be configured in 
networks? 

Answer: No. A network has many implications which go far 
beyond a 2780 transmitting data. Just because one 
RCS can communicate with another does not mean that 
you can set up a network. Be careful not to associate 


- 


these products with networks. 


Question: I have a customer who would like RSTS with HASP; will 
RSTS-2780 suffice? 

Answer: Be careful. People frequently confuse terminology. 
First be aware that HASP is a software system which 
is used in IBM 360 and IBM 370 systems. HASP soft- 
ware can support 2780 terminals and HASP Workstations. 
2780 terminals and HASP Workstations are not the 
same. We have a HASP Workstation package (CORE- 

HASP) but it has no relationship to the 2780 packages. 


RSTS-2780 is a 2780 package. 
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Questions and Answers (Cont'd) 
SoS AN SWEers (Cont da) 


Question: DEC literature specifies Bell modems for use with the 
2780 products. What if a user wants to use other 
types of modems? 

Answer: — We test our products with Bell modems. Since there 
are so many other modems in the marketplace, it is 
impossible for us to run tests with all of them. 

Our literature normally states "Bell Model (xxx) or 
equivalent." If the customer can find the appropriate 
equivalent fine. However, we can't help him if he 


runs into problems. 


Question: Can a customer order a 2780 configuration without 
a line printer? 

Answer: It is possible to receive data directly onto disk 
with the DOS, RSK-11D, and RSTS/E 2780 packages so 
it's possible that a customer may want to order a 


system without a line printer. 


We do not recommend eliminating the line printer. 
It will just make support more difficult; running 
diagnostics and tests will be complicated. If the 
customer insists on no line printer, then he should 
be made well aware of the fact that he will incur 


some inconvenience. 


Question: I've had difficulty getting programming documentation 


for the 2780 products? 
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Questions and Answers (Cont'd) 


Answer: 


Question: 


Answer: 


Question: 


Answer: 


The 2780 Remote Computer Systems do not require 
programming manuals. Each package only requires 
an operator's manual which shows how to run the 
system. The documents that the customer should 
normally get are: the sales brochure and the 
software product description. An operator's 


manual is shipped with the system. 


Is the operation of RSTS/E~-2780 identical to RSX-11D/2780? 
No. RSTS/E-2780 can be used in two modes. In one 

mode, the RSTS operator controls the transmission. 

In the other mode, RSTS/E users can "queue" files 

on disk for transmission. RSX-11D/2780 only provides 


operator mode. 


Are there any subtleties one should be aware of? 
The new 2780 packages are not complex. However, 
there are subtleties that can vary from application 
to application. We recommend that you consult 
someone who knows the 2780 packages well whenever 


you have a prospect. 


Ordering Information 


RSTS/2780 


QPD1O-AC, AD, AE, AF* $4,000 
includes single use license, binaries 


manuals, and installation. 
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OIGITAL EQUIPMENT CORPORATION 


RSTS/E DATA COMMUNICATIONS 


RSTS/E data communications systems have been designed for flexibility and 
ease of use. Line speeds of 10, 15, and 30 characters per second can be 
used remotely over dedicated or dial-up lines and speeds up to 960 charac- 
ters per second can be used local to the computer system. RSTS/E supports 
only full duplex. 


Several choices are available to configure DEC supplied hardware for 
connecting telephone equipment into the system. Among those choices are 
the DL11 and DH11 communications hardware. Economic trade-offs can be 
made between these two types of devices. DL11l's have the advantage of 
small incremental growth costs, are slightly less expensive except in 
installation increments of 16 lines, but do not provide the multiple line 
speed capability on each line as the DH1l's do. 


Specific hardware attributes of the DHll and DL11 equipment supported by 
RSTS are given below. 


Unit Description 
DL11A Current loop (20 ma) Serial Line Interface having one baud rate 


of up to 9600. 


DL11B EIA Serial Line Interface for connection to modem having one 
baud rate up to 2400 baud locally or up to 300 baud in private 
line remote communications 


DL11E EIA Serial Line Interface with modem control and supporting one 
rate up to 300 baud on the switched telephone network. 


DH11-AA Multiplexer which connects a PDP-11 computer with up to 16 asyn- 


chronous serial communications lines with individually program- 
mable parameters. Remote lines have baud rates of 110, 150, 
and 300 baud. Local lines operate at up to 9600 baud. 


DM11~BB Modem Control Multiplexer which provides control to interface 
with up to 16 data sets. 


DM11-DC Provides lines for conditioning four EIA compatible lines with 
modem control. (EIA Modem) 


DM11-DB Line Adapter which implements four EIA lines for private line or 


local terminal connection. (EIA Local or Non-Dial-up Modem Control 


or private Line Applications.) 


DM11-DA Line Adapter which implements four 20 milliamp. terminals. (20 
Mill local) 


Typical DH11 configurations might be as follows: 


16 terminals connected to the switched network 


es PDP-11 UNIBUS 


DM11-BB 


had iia ian 


to 16 terminals on switched network 


16 terminals connected to local terminals 


bes PDP-11 UNIBUS 


DH11-AA 


to een eT 20 ia terminals 


to 5 EIA interface terminals to 3 - EIA private lines 


16 terminals connected to switched network as well as ‘some 
local connections 


DM11~-BB 


YY ~~ 


_— 


to aad oars 20 milliamp terminals 
to 2-local terminals with null modem 
to 2 private lines with modems 


to 8-terminals on the switches network 


hoo 2 


Remember that the load imposed on the system by a terminal outputting at 9600 
Baud is about t same as the load imposed by 32 terminalis -- ali outputting 
at 300 Baud. Considering that most input takes place no faster than 50 Baud 
(typing speed), five terminals running interactively at 9600 Baud in normal 

Interactive use probably won't significantly degrade system performance, al- 


though 9600 Baud output does place an instantaneous, heavy load on the system. 


Few useful applications of terminals outputting at 9600 Baud exist. It 
is more reasonable to output to a terminal at 1200 Baud or less. 


DH11 PROGRAMMABLE ASYNCHRONOUS FROM: Dimitri Dimancesco 
MULTIPLEXER cod a 


DECcomm recently announced two new versions of the DH11 programmable 16-line multi- 
pnlexer. The new versions desianated NH11-AF and NH11-AN are mara comnact and are 


priced lower than the existing DHll. 

Yeu can now order: 

DH1L1-AA - This is the original version of the DH11. It requires DMll type line 
adapters depending on the type of connection (DML1~-DA for 20 mAmp, DM11-DB 
for private phone lines, DM11-DC/DM11-BB for switched telephone network 
connections), 

The DH11-AA and appropriate DMll modules should still be ordered when 
configuration requires a combination of 20 mAmp, private, or dial-up 
lines. 

DH11-AD - New. Interfaces PDP-l1l to 16 EIA/CCITT switched network lines. Includes 
modem control. Uses DJ1ll type distribution panel, therefore cables must 
also be ordered for some configurations. 


DH11-AE - New. Same as DH11-AD except no modem control. 


DM1l Type Modules (irclude cables) 


A gnnnogggneeeneen 


DH11-AA Distribution Panel 
requires DMll modules 


DJ11 type interface panel 
used with DH]1]-AD and -AE 
(no cables provided) 


/ 
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DH11-AA (C) 


DM11-DA 


DM11-DB 


DM11-Dc 


DM11-BB 


Programmable Asynch. 
16-line multiplexer 
and mounting panel. 
Includes space for 
up to 4 DMll Line 
Adapters (16 lines). 


Line Adapter for 4 
20 mAmp terminals. 
Includes cables. 


Line Adapter for 4 
EIA/CCITT lines. 
Includes modem 
cables. 


Line Adapter for 4 
EIA/CCITT lines. 
When used with 
DM11-BB, provides 
modem control. 
Includes modem 
cable. 


16-line modem 
control for prog- 
ram operation of 
control leads for 
103, 202 or equiv- 
alent data sets. 


DH11 


Prereqd. 


11/CPU 


DH11-AA 


or -AC 


DH11-AA 
or -AC 


DH1L1-AA 
or -AC 
and 
DM11=-BB 


DH11-AA 
or -AC 
and 

DM11~DCc 


*Mounts in DH11-AA or AC distribution panel 


Price 


$4,400 


485 


860 


1,295 


14 


2 


Field 
Maint. 


32 


1] 


19 


Bus Amp 
Install. Mounting Load +5V 
175 2 SU/ 2 4.7 
Sm Pan 
40 * 
40 * 
40 * 
80 * 1 2.8 


RSTS V5 DH11/DM11B HANDLER 
EE 8 ANDER 


The DH11/DM11B service for RSTS V5 provides essentially the same 
services for the RSTS user which are provided by the DCll service. 
These services include support of the variable speed capabilities 
and auto-answer modem facility. 


Relevent documents explaining the hardware are the DH11 Engineerin 
Specification and "DM11-BB Modem Control Manual" (DEC-11-HDMBA-B-D) . 


The DH11 has 8 contiguous I/O page-addressable registers which are: 


CSR interrupt control, extended memory, line select 

NRC Received character, line number and char. status 
LPR Line pdarameters: speeds, etc. 

CAR Cursent address 

BC Byte count 

BAR Buffer active: 1 bit per line 

BCR Break control: 1 bit per line 

SSR Silo status: silo fill level, silo alaram level 


The error logging module is used to handle certain exceptions which 
are caught by the DH11 service. These include: 


Non-existent memory referenced by NPR transfer 
Silo overflow 

Data overrun 

Break 

Parity error 


Non-existent memory errors should never occur. If they do, then 
there is either a RSTS software problem or the hardware is 
malfunctioning. 


Silo overflow errors occur when more than 64 received characters 
have accumulated in the silo, and indicate that RSTS is receiving 
more characters than the software can process. 


Data overruns are generated when a received character is lost due 
to silo overflow. 


A break condition is generated by reception of a break Signal ona 
line, break errors are no cause for alarm, as the break signal can 
be generated by the keyboard Operator on many terminals. 


Parity errors would be generated by reception of characters with 
improper parity. However, since the parity sensing circuitry is 
disabled when RSTS is running, these errors should not occur. 


The DH11 is operated with the following conditions set up: 


XMIT+NEM INT ENB ON 
SILO OVERFLOW INT ENB ON 
RECEIVER INT ENB ON 
EXTENDED MEMORY BITS g 


PSCC 


RSTS V5 DH11/DM11B HANDLER 


AUTO~ECHO OFF 
HALF-DUPLEX OFF 

TRANSMIT SPEED =RECEIVER SPEED — Ae? Always 
PARITY ENABLE ORR: ea es a 
TWO STOP BITS ON —————— > _2T4/ 5 d:tferan 
CHAR LENGTH 8 BITS —_-~ 

BREAK CONTROL NOT USED 

SILO ALARM LEVEL p 


Since the small buffer pool and indeed, the whole V5 monitor has 
its virtual address equal to its physical address, the extended 
memory bits are always zero. The silo alarm level is set at zero 
so that a receiver interrupt will be generated on reception of a 
Single character. 


The DH11 service depends on the standard RSTS terminal tables 
having entries as follows: es 


TTILST DHI/. CSR (Input side for KL11's) 
TTOLST DM11BB CSR- +: (Output side for KL11's) 
TTSLST Line parameter (Word) 

Subline number (wo sad ) 

Same as Kull (Byte) 

Same as KL11 (Byte) 

Same as KL11 (Byte) 

Same as KLl]] (Byte) 


The DH11 has two interrupt vectors, one for XMIT and another for 
receive. These vectors are located in the floating vector space. 


Ree ewe Dn tevruypts Are aimed at YAM EAT 
XIE Eaterrupteave aimeadat gyrr 


\e 


The DH1l receiver interrupt processor will empty the silo completely 
before exiting. The received characters are processed by the 


Standard TTY service code to move the received character to a small 
buffer. 


The DH11 transmitter interrupt processor will check each DHll line 
(for which a DDB has been allocated) for pending output and zero 
byte count before exiting. When a Subline is found with a zero 

byte count and with pending characters in its small buffer chain all 
the characters present in the leading small buffer are sent out via 
the DH11. Thus the NPR capability of the DH1l is utilized to send 
up to 30 characters per interrupt. 
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RSTS V5 DH11/DM11B HANDLER 


The DM118Bhas two I/O page addressable registers: 


CSR Interrupt and scan control 
Line status 


The DM11BB is operated with the following conditions set up: 


INT ENB ON 
SCAN ENB ON 


The treatment of 0M11B interrupts is essentially analogous to the 
treatment of the corresponding conditions, for the DCll. The modem 
clock service which runs once per second is used to detect lines on 
which carrier has been lost and lines for which carrier has not 
appeared after ring and anser. There is at present no "hung line" 
code for DHl1 lines, since this condition has not yet been encountered. 
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BREAK {LINE | | | | | 
OMTROL | 10 | Se 2 Q oj, Il 
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vros/VT50 


VT05 DIRECT CURSOR ADDRESSING 


Direct cursor addressing of the vT05 display keyboard is done 
by using PRINT statements of the form 

PRINT #4N%, CHRS (X%); 
where X% is one of the following codes. The ; following the 
argument i5 needed to prevent automatic carriage-return. 


The codes are as follows: 


8% backspace cursor 
11% cursor down (line feed) 
14% direct cursor control (see below) 
24% cursor right one position 
25% cursor left (don't use on VT05) 
26% cursor up 
28% home down (don't use on VT05) 
29% home up (move cursor to upper left-hand corner) 
30% clear to end of line 
31% clear to end of screen 


Direct addressing is established as follows: 
if Y% is the line number (Y-axis) 
and X% is the column number (X-axis) 
and the upper left-hand corner is (1,1) 
PRINT #N%, CHRS (14%); CHRS$ (31%+Y%); CHRS (31%+X$) ; 
positions the cursor to (X%,Y$%) 
Note the following functions: 
2909 DEF FNQ2 (xX%,Y%) 
PRINT 411%, CHR$ (14%); CHRS$(31%+Y%); CHRS (31%+X8); 


2918 FNEND ' position cursor to (X%,Y$%) 
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VTO5 DIRECT CURSOR ADDRESSING (CONT'D) 


21968 DEF FNQ3(X%,Y%) : 
PRINT 411%, CHRS$ (14%); CHRS (31%+Y%) ; CHRS (31%+X$%) ; 
CHRS (31%) ; | 
2119 FNEND ! position cursor to (X%,Y%) and clear to e.o.s. 
22998 DEF FNQ4 (X%,Y$) : 
PRINT 411%, CHR$(14%); CHR$(318+Y%); CHRS$(31%+X8) ; 
CHRS (308%) ; 


2219 FNEND ! position cursor to (X%,Y%) and clear to e.o.l. 
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The following table will be useful when writing programs that interface with the VT5O. It 
details the processing of each 7-bit ASCI! character received at the terminal. 


| When the VT50O is in... 


i 


... Normal Mode the next ASCII character 


| received is treated as data. 


| Octal 

| Code Char Action Taken 
000 NUL None 

| 001 SOH None 

. 002 STX None 

| CoS CTX None 

004 EOT None 

005 ENQ None 

° 36 ACK None 

CO7 BELL Rings Bell. 

010 BS Backspaces 

Cursor. 

011 HT Horizontal Tab 
Moves cursor to 
the next tab stop. 

| Tab stops are set 
every eight 
spaces to the 
72nd character 
position. After 
the 72nd position, 

| TAB moves the 

| cursor to the right 

| one position. 

| 012 LF Moves Cursor 

down one line 

| and scrolls if 

| required. 

| 013 VT None 

| 014 FF None 

| 015 CR Moves Cursor to 

left margin of 

current line. 

016 SO None 

017 Sl None 

020 DLE None 

021 DC1 None 

022 DC2 None 

023 DC3 None 

024 DC4 None 

| 025 NAK None 
| 026 SYN None 
027 : ETB None 
| 030 CAN None 
| 031 EM None 
|_032 SUB None 


| 


Resulting 
___ Mode 

Normal None 

Normal None 

Norma! None 

iNOrmai None 

Normal None 

Normal None 

Normal None 

Normal Rings Bell. 

Normal Backspaces 
Cursor. 

Normal Horizontal Tab 
Moves cursor to 
the next tab stop. 
Tab stops are set 
every eight 
spaces to the 
72nd character 
position. After 
the 72nd position, 
TAB moves the 
cursor to the right 
one position. 

Normal Moves Cursor 
down one line 
and scrolls if 
required. 

Normal None 

Normal None 

Normal Moves Cursor to 
left margin of 
current line. 

Normal None 

Normal None 

Normal None 

Normal None 

Normal None 

Normal None 

Norrnal . None 

Normal None 

Normal None 

Normal None 

Normal None 

Normal None 

Normal None 
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...Escape Mode the next ASCII | 
character received is treated 


as acommand. 


‘Escape 


Resulting | 
Action Taken Mode | 


Escape 
Escape 
Escape 
Escape | 
Escape 
Escape 
Escape 
Escape 
Escape 


Escape 


Escape | 
! 


Escape | 
Escape | 
Escape | 

| 


Escape 
Escape 
Escape 
Escape 
Escape 


Escape 
Escape 
Escape 
Escape 


Escape | 


Escape 


; ___ Escape 


[ When the VT50 isin” aaa 


is a ee 
... Normal Mode the next ASCII character Escape Mode the next ASCII 


received is treated as data. character received is treated 


as acommand. 


Octal Resulting 
Code Char Action Taken Mode Action Taken 
033 ESC Sets terminal Escape Sets terminal Normal 

in Escape Mode. in Normal Mode. 
034 FS None Normal None Escape 
035 GS None Normal None Escape 
-036 RS None Normal None Escape 
037 US None Normal None Escape | 
040 Space _ Displayed Normal None Normal | 
041 I Displayed Normal! None Norma! | 
042 | " Displayed Normal None Norma! | 
043 i Displayed Normal None Normal | 
044 $ Displayed Norma! None Normal | 
045 yA Displayed Normal None Normal ! 
046 & Displayed Normal None Normal | 
047 Displayed Normal None Normal 
050 ( Displayed Normal None Normal | 
051 ) Displayed Normal None Normal | 
052 2 Displayed Normal None Normal ! 
053 z . Displayed Normal None Normal; 
054 ; Displayed Normal None Normal | 
055 _ Displayed Normal None Normal ; 
056 : . Displayed Normal None Normal | 
057 / Displayed Normal None Normal | 
060 0 Displayed Normal! None Normal : 
061. 1 Displayed. Normal None Normal 
062 2 Displayed Normal. None Normal | 
063 3 Displayed Normal None Normal! | 
064 4 Displayed Normal None Normal | 
065 5 Displayed Normal None Normal 
066 6 Displayed Normal! None Normai | 
067 7 Displayed Normal None Normal | 
070 ' 8 Displayed Normal None Normal 
071 9 Displayed Normal None Normal 
072 Displayed Normal None Normal 
073 Displayed Normal None Normal 
074 < Displayed Normal None Norma! 
075 = Displayed Normal None Normal | 
076 > Displayed Normal None Normal | 
077 ? ‘Displayed Normal None Normal 
100 @ Displayed Normal None Normal 
| 101 A Displayed Normal! Moves Cursor Normal 

up one line. 

102 B Displayed Normal None _ Normal : 


nee mee een et een a RST a a a Ee 
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‘When the VT50 is in. 


pee ee _ 


.Normal Mode the next ASCII character 
| received i is treated as data. 


.. Escape Mode the next ASCII 
character received is treated 
acommand. 


Octal Resulting 


, Code Char ActionTaken ===» Mode_ Action Taken 
j 
110 H Displayed Normal Moves Cursor Normal 
to home position. 
111 | Displayed Normal None Normal 
tte J Dispiayeu INUIIai Erases itne from INUTMai 
Cursor to bottom 
of screen. 
113 K Displayed - Normal Erases screen Normal | 
from Cursor to 
right margin. | 
114 L Displayed Normal None Normal | 
115 M Displayed Normal None Normal | 
116 N Displayed Normal None Normal | 
117 O Displayed Normal None Normal 
120 P Displayed Normal None Normal | 
121 Q Displayed Normal None Normal | 
122 R Displayed Normal None Normal | 
123 S Displayed Normal None Normal | 
| 124 T Displayed Normal None Normal | 
| 125 U Displayed Normal None Normal _ 
| 126 V Displayed Normal None Normal | 
| 127 W Displayed Normal None Normal | 
130 X Displayed Normal None Normal | 
131 Y Displayed Normal None Normai , 
132 Zz Displayed Normal None Normal | 
‘e Displayed Normal Enables Hold Normal | 
(See page 19 .) 
134 % Displayed Normal Disables Hold Normal 


Screen Mode. 
. (See page 19 .) 
135 J Displayed Normal All lines from Normal 
: top of the screen 
up to and includ- 
ing cursor line ~ 
are printed. 
136 A Displayed Normal Enables Auto Normal 
Print with top 
line printed first. 


133 
Screen Mode. 
| 
{ 
| 
j 


[When the VTS0isin.. I ei a 


..Normal Mode the next ASCII che 
received i is treated as data. 


NM xX ECC FHA DDODZ-KXx-- zor arog ne 


i coat anand 


2 


Celste 


cee me 


Action Taken 


Displayed 


Displayed as @ 
Displayed as A 
Displayed as B 
Displayed as C 
Displayed as D 
Displayed as E 
Displayed as F 
Displayed as G 
Displayed as H 
Displayed as | 

Displayed as J 

Displayed as K 
Displayed as L. 
Displayed as M 
Displayed as N 
Displayed as O 
Displaved as P 
Displaved as Q 
Displayed as R 
Displayed as S 
Displayed as T 
Displayed as U 
Displayed as V 
Displayed as W 
Displayed as X 


‘Displayed as Y 


Displayed as Z 
Displayed as 0 
Displayed as / 

Displayed as [7] 


Displayed as > 


None 


alecler 


ee eae 


Resuiting 
Mode 


ae A ERNIE NT oa ap Op se 


Normal 


Normal 
Normal 
Normal 
Normal 
Normal 
Normal 
Normal 
Normal 
Normal 
Normal 
Normal 
Normal 
Normai 
Normal 
Normal 
Normal 
Normal] 
Norma! 
Normal 
Normal 
Normal 
Normai 
Normal 
Normal 


Normal] 


Normal 
Normal 
Normal 
Normal 
Normal 
Normal 
Normal 


Action Taken 


See a 


; ‘Escape Mode the next ASCII 
character received is treated 
as a command. 


Resulting 
Mode 


Disables Auto Normal 


Print after 

current lines 

are copied. 

None Normal 

None Normal 

None Normal 

None Normal 

None Normal 

None Normal 

None Norma! 

None. Normal! 

None Normal 

None Norma! 

None Normal 

None Norma! 

None Normal | 
None Normal 
None Normal | 
None Normal | 
None Nermal | 
None Normal | 
None Normal | 
None Norma: | 
None Normal 

None Normal 

None Norma! | 
None Normal | 
None Norma! 

None . Normal 

None Normal 

None Normal 

None Normal 

None Normal 

None Normal 

None Escape | 


‘Typing the key 
| labeled 


7-bit ASCH code 


Transmits the following 


he folio. " Typing the key 


labeled 


Transmits the following 
7-bit ASCII code 


fees aes eel 
a ae 
es 7g Me 
A 124 | 
| B | 125 a 
Cc 126 | 
D 127 | 
| E 130 ail 
rc 131 | 
| G | 7 1Se 
| H 110 | BACK SPACE 010 : 
| | 114 | TAB | 011 | 
J 112 LF 012 | 
K 113 | ~ RETURN 1 08 ea 
L 114 | ESC | 033 | 
M 115 | SPACE BAR | 040 | 
N 116 \ 134 
O ice DELETE...| es 
Pp 120 BREAK Does not transmit an 
Q 121 ASCII code. 
R 122 
S 


123 | 


Acts as a forceable | 
| interrupt (see page 19), 


The keys listed above are uneffected by the SHIFT key. For example, typing both the "A" 
key and holding down the SHIFT key and typing ‘A” transmit ASCII 101. 
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The following keys are effected by the ‘SHIFT" key. 


Typing the key Unshifted transmits dl With the SHIFT key held 
labeled the 7-bit ASCII code | down transmits the 7-bit 
| . es ASCili code | 


041 (!) 
062 100(@) 
063 | 043 (#) 
044 ($) 


eee oa | it HODOONDOAWN = 
oO 
® 
om 


eae eer oo eT Oa: Sens = = eee emnenes we assem ee cee em ee ee 


Holding down the CTRL key affects the ASCII signal transmitted by the next key typed. it 
forces bits 7 and 6 to 0. For example, holding down the CTRL key and typing the letter G 
(107) forces 107 to be converted to C07 (BEL). The one exception is holding down the 
CTRL key and typing the BREAK key. This reinitializes the termina! (see page 19). 


The following keys do not transmit any signal outside of the terminal. They are used to 
direct internal terminal activities. 


ha ; 
one oho, a fe ES oh doe ts oss seats eat ' 
—> 


i: the key Withthe SHIFTkey | 
labeled... © held down, directs | 
the terminal to 
Se A ena 
<= aad 
Display (scroll) Display (scroll) 
one new line when 12 new lines when 
the terminal is in the terminal is in 
Hold-Screen : Hold-Screen 
Mode (see page 19). | Mode ‘see page 19). 
| PRINT Produce a hard Campliments | 
copy image of the |: Auto-Print Mode | 
entire screen. (see page 20). | 


Some Pointers on RSTS/E 
Hardware Problems 


or 


What To Do If The Diagnostics Run 


& RSTS Doesn't 
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Gary Alles 
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Notes on RSTS-E System Hardware Configuration 


l. A KW11l-L is less expensive and more reliable than a KW1ll-P. 


2. An RPO3/RP11-C is bigger, faster, and more reliable than an RKO5. 
If your customer plans to expand, start him out with an RP. 


3. An RPO3, only system must be sold with TM11/TU10 for proper 
file backup. An RK/RP system should have tape. 


4. Mos Memory helps to increase system thruput significantly, but 
not advised unviil purchasing memory from 88K, because core is 
cheaper. Mos is now much more reliable than it was in the early 
history of the 11/45. 


5. FPP when installed on 11/45's helps thruput of Math Package 
routines. You can see the differance. 


6. The DH11 is a much more desireable TTY interface compared to 
using several DLl11's. It costs far fewer bus loads, and requires 
relatively little care for it's driver. 


7. It is possible to get an 8K user space in a 32K system by leaving 
out most of the basic Plus features but the spooling programs 
and a few other cups’ such as UT5DPY require 12K user space to 
run. Unless you are very certain of your customers application, 
avoid 32K systems. It is far wiser to start your customer out 
with 48K core (3) MF11UP's. Parity is now required. 


8. It is cheaper to buy 32K core than an RS03. Even if your system 
has exceptionally high Disk activity already, it is probably 
wiser to purchase core as opposed to swapping disk. 32K MF11UP=$12.6K 


9. 1 RK11 © + 5 RKO5'sz 31,400 
3 1 RP11C, + 1 RP03<4 31,880 


6M wds. slow, unreliable 
20M wds, fast, reliable 


10. 1 RSO3 + controller 256K wds = $14K 
1 RSO4 + controller 512K wds = $18K 
2 RSO3 + controller 512K wds = $23K 


11. You should have enough core to keep of your jobs in core. 
(Assume largest size jobs. 


17-/ 


If you encounter similar errors during SYSGEN on the RK 
on the same system that has errors during SYSGEN on the 
RF, you may very well have a UNIBUS or memory problem. 


Before getting too deep in this problem, first be certain 
that the distribution kit is valid, and that it is being 
read correctly. Tape skew and/or RK@5 head alignment may 
be cause of problem. It RSTS/E has been configured at 
another site, and it too fails suspect the hardware. 
There are no kaown bugs in the sysgen procedure other 
than mis-interpretation of DL11-C's and DL11-E's under 
automatic sysgen. If you have two different types of 

DOS supported disks, and sysgen fails on one but not the 
other, you may have found a faulty disk unit. 


Make sure all known patches are correctly installed. 


ee 


If you suspect memory, be sure to adjust strobe according 
to latest technique, not by setting strobe in the middle 
of the window. A minimum 50 NS window is required, or 
your memory should be replaced.. Strobe should be adjusted 
25 NS back from latest failing point in strobe window. 

Do not swap boards between memory sets unless you re- 
strobe. 


Strobe normally should not be bothered with on very new 
systems, bui older systems (Apr '74 or older) often are 
not found to have sufficient window sizes, and are fre- 
quently out of adjustment. 
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If you suspect UNIBUS, be sure BUS-loading on both sides 

of BUS repeater is about equal. (18 l6ads or less) minimize 
UNIBUS cable length wherever possible even if you have to 
reconfigure system. 


Foam the UNIBUS. 


Inspect bus cables very carefully for holes, sharp crimps, 
bubbles, and cuts. 


Mharnl fTATrTrorTTe wreak i mw Rerns A 
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Power Cords. 


ae hoa’ wae bee Lm 
r+ WJ om SLE -y ws 


Be certain that BUS signal levels on both sides of BUS 
repeater are same or nearly so. Watch for noise. 


Extensive engineering changes are being made to the BUS 
structure itself. BG lines are now supposed to have pull- 
down resistors at each interface. BUS Driver & BUS Receiver 
chips have been re-engineered, and are to be replaced with 
new chips when chips are available & conditions warrant. 
M920's can cause problems, two new versions are being worked 
on. 


Preferred BUS Configuration is for systems w/o Mass. BUS Devices. 


l. Processor 

2. Core 

3. Non Buffered NPR Devices 

4. Buffered NPR Devices 

5S. ROMS & Communication Options 


1% precision terminators are available for the Unibus 


Remove unused DLll's, they cause all kinds of problems 
for no easily explained reason. 


Traps and/or Jumps to zero have been known to be caused 


by floating DL11's, faulty TMll's and time-out problems 
in RKO5's. 


Vectors and addresses on DL1l's are commonly incorrectly 
jumpered. Check priority jumper card in DL1l's and make 
sure it has insulating tape and is properly installed. 
If you have static, use H7002 or H7003 line filters. 


Recheck speed setting for XTAL in DL11. Check for loose 
connections. 


a 


Be absolutely certain all power supply connections are tight, 
power supplies are not susceptible to normal vibration, 
(noise or spikes are not induced) and that power supplies 
are correctly adjusted. This can not be assumed. 

Check power plug polarity and proper grounding. 


Line voltages from factory to customer site can and will 
vary. Check for noise and transients. 


Margin H720 power supplies for DC Lo sensitivity. (-15 uts). 
Use of a DUM is preferred when adjusting power supplies. 


2. Scope DC-I.0 
3. Adjust -15 until DC-LO is in middle of its possible values 


Pull on all Mate-N-Lock connectors and make sure wires 
are in tight. 


Make sure moving head Drive Packs are formatted on your 
machine. 


Make sure air filters are clean. 
Check power-fail circuitry on 11/45's. 
Monitor DC-LO while system is running. 


Sector Transducer and Head Alignment should be correctly 
adjusted. 
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Never slow down processor to avoid problems. This will 
cost much in the long run, if not cause more problems. 


Make sure all 11/40 processor options are correctly 
jumpered. 


Margin Processor. 
Investigate all grounding and static problems. 
50% humidity is required. 


Check for temperature variations and don't mount cold 
packs. 


Clean tape & disk drive heads. 


Check tape head alignment and visimag tape. Use quality 
tape. 


Check for any potential mechanical connection problems. 


Time-dependent power problems may occur. 


PI>=7 


Check ECO levels of all options. 


If your system is a year behind in ECO 


levels, you may well get RSTS/E to run, but the system 
probably won't be as reliahle as a new one would be 
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DATEs APRIL 20,1973 
PIBIECTs RSTS ODT, wITH DISK LOOK AND NEw SYNTAy 


reOMe MIKE SMITH (FORMERLY IN DEC SOFTWARE DEVELOPMENT) 
(CURRENTLY FIXING CARS FOR GRINS Avs ) 
(TINGLE'S LOTUS CENTER, 31R SPRIKG $T) 
(WATERTOWN, MASSACHUSETTS, @2172 ) 


PROJECT NUMBERS P=67907668 
| RSTS DEVELOPMENT 
RSTS/E DEBUGGING AID 


FILENAME? ODTDOC,« DOCUMENTATION 
OOT,« SOURCE PROGRAM 

EDIT Ss ODTO0C,5 . 

By3 JIM MILLER (MAYNARD, 1262, 3173) 

SYSTEM 40 IDe 140,1315 ACCOUNT "BRAMHALL# 


THE MATERIAL INCLUDED IN THIS DOCUMENT, LIMITED TO 
BUT NOT INCLUDING, CONSTRUCTION SPEEDS AND OPERATING 
PURPOSES Is FOR INSTRUCTION TIMES ONLY, ALL SUCH 
CLAIM Ig MATERIAL WITHQUT NOTICE, AND Ig BOUND To 
CHANGE THE SUBJECT, 


THE PURPOSE OF THIS OOT IS TO BE USEABLE FOR DEBUGGING RSTS/_E, 
SOME FEATURES OF THE ODy IN REGULAR YSE ON THE PDPey{ HAVE BEEN 
LEFT OUT WITH VERY MUCH PURPOSE, IF ANYONE WANTS TO USE THIS ODT 
I WILL BE HaPPY TO TELL You WHAT YOU NEED TO KNOW TQ USE IT, 


IF YOU HAVE SUGGESTIONS AND/OR IMPROVEMENTS gNp ? LIKE THEM 
I WILL PUT THEM IN, IF I DON'T LIKE THEM I wILL TELL You HOw 
TO PUT THEM INVOUR OWN COPY of OoT, 


ALL BUGS WILL BE FIXED wITH GOOD HUMOR AND REASONABLE SPEED, 


oe 


Stern Ur trad VOCUMEN Tee 


THE PURPOSE OF THIS DOCUMENT JS TO MESCRIWE THE USAGE OF THE ONT 
TRAT wAS BUTLT FOR USE By RSS, THIS ANY HAS A DTPRPRENY SYNTAY 
.7™AN THE NORMAL ODT ANDO MAS CERTAIN "ENHANCEMENTS (Op COURSE LY, 


( 138 IS NOT TO SAY THAT IS ENTIRELY DIFFERENT, BUT ENOUGH 90 THAT 
“,OU SHOULD READ AT LEAST THIS FIRST PAGE, 


THE MAJOR DIFFERENCE IN THE SYNTAX IS THE USE OF THE "3H 
CHARACTER, IN SHORT IT IS NOT NEEDED EXCEPT TO DELIMIT MULTIPLE 
ARGUMENTS GIVEN TO COMMAND, YOU SHOULD THINK ABOUT THIS ONE CAUSE 
IT CAN BE A PAIN IF yOu TYPE ExTRA "pHtsg, 


ANOTHER DIFFERENCE I8 IN THE WAY REGISTERS aRE OPENED, THE OPEN COMMAND 
TS USED TO OPEN A REGISTER AND TO RETYPE THE CONTENTS OF A REGISTER, 

SC IF YOU OPEN A REGISTER AS A WORD, AND THEN TYPE THE CHARACTER THAT 

1S USED TO TYPE A BYTE THE REGISTER IS STILL OPEN AS A WORD. THE REGULAR 
Op’ RE@OPENS THE REGISTER AS A BYTE, 


. “2 ANOTHER DIFFERENCE Ig THE USE OF THE "S§" (SINGLE INSTRUCTION) 
/QMMAND, THE "§" COMMAND DOES NOT SET A MODE BUT OPERATES LIKE THE 
" Command In THAT Ty CausEsS an INSTRUCTION To BE EXECUTED, (MAYBE 


“iOU SHOULD READ THE WHOLE DOCUMENT), 


THE PURPOSE OF THIS VERSION OF COT IS TN ALLOW THE USER 70 LOOK 
AT THE DISK, THIS 18 DESCRIBED LATER ON, wHaT REALLY HAPPENED IS 
THAT THE WHOLE THING GOT REWRITTEN CAUSE Y COULDNIT RESIST IT, 


NOW COMES THE OPINION PART, THE SYNTAX IS MUCH CLEANER AND MORE 
“ WERFUL, THE CORE REQUIRED By THE CODE ANN DIRTy HaTA IS ALSO 
¢ CH LESS THAN THE STANDARD ODT, BUT wHEN yOU ADD THE DISK 170 

»JFFER OF 1900 ByrES Ir ySES SOMEWHERE AROUND 6200 BYTES TOTAL, 
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THE CURRENT SOURCE OF ODT MAY BEF ASSEMBLED, LINKED, AND 

“JADED JUST ABOUT ANYWHERE, THERE I8 SYMBOL CALLED “ORGODT" THaT 

71S USED TO SET THE LOWEST ADORESS OF ont IN ABSOLUTE ASSEMBLIES, 
(IME ASSEMBLY IS RELOCATASLE THEN THIS SYMBOL IS SET TO 

‘ORGODTS, # 


THE SIZE OF ODT r8 as FOLLOWS; 


DISK 17/0 1@00 (BYTES) 
STACK 42 
CODE 52000¢ 
TOTAL 6249 


e THIS rs arre Oy Mate, FOR EXACT FIGURES TRY ASSEMBLING IT, 
SOME THINGS TO NOTE ABOUT STARTING ODT, 


THE SOURCE HAS ALL VARIABLES SET TO THEIR INITIAL VALUES 
AND SETS A VECTOR IN LOCATION 14 10 GO To ODT. THIS IS TO 
ALLOW INITIAL ENTRY VIA THE "HKP" INSTRUCTION 890003) AND 
GIVES CLEAR BREAKPOINTS AND EMPTY RELOCATION REGISTERS, 


THERE ARE TwO EnTRY POINTS DEFINED THAT May BE OF INTEREST, 


"0,0DT" IS AN ENTRY THAT I8 USED FoR 4 COMPLETE CLEAN START, 
ALL BREAKPOINTS AND RELOCATION REGISTERS ARE CLEARES 


"O,ENTR® IS aN ENTRY THAT MAKES ODT THINK IT HAS HIT AN UNDEFINED 
BREAKPOINT, ALL ACTIVE BREaKS ARE REMOVED FROM Tre USER:S 
CORE, IF YOu PROCEED FROM THIS ENTRy wITHOUT ALTERING 
YOUR "PCH you aRE RIGHT BACK WHERE you STARTED FROM, 


THE USER'S CONSTANT REGISTER IS INITIALIZED BY THE SOURCE 
TO CONTAIN THE ADDRESS OF "OQ,ODT*", THE ADDRESS OF "OQ ENTRY 
IS EQUAL TO "0,0DTe2n, 


THE CUE FOR 4 COMMAND I5§ "@CR>aLF>." AS OPPOSED To "a" THIS IS 
SUPPOSED TO MaKE you THINK NEW SYNTAX, BESIDES THIS OpY was DEBUGGED 
WITH PDP=10 MIMIC AND Hen IS WHAT MIMIC TyPES FOR A COMMAND, 


THE "RUBeOUT! CHARACTER 18 USED TO RESET THE COMMAND INPUT ROUTINE 
VIA AN ERROR ENTRY, THE TYPE SAME AD FEATURE 18 DRIVEN VIA THE 
CHARACTER OUTPUT ROUTINE (IDEA COURTESy NATHAN TEICHHOLT7) AND 
CHECKS EACH CHARACTER AGAINS] a <RO>, THIS aLLOws STOPPING OF yHOSE 
LONG Lists OF CELLS IN A wORD SEARCH, 


THE TYPE AHEAD SCHEME IS NOT INTERRUPT ORIVEN, BUT THE WAIT LOOP OF 
CHARACTER OUTPUT KEEPS LOOKING af THE YNPUT FLAG, wHEN THE JNPUT FLAG 
COMES UP THE CHARACTER 18 STASHED Away IN a RING BUFFER, yHE CHARACTER 
ENPWT ROUTINE DOES KEEP LOOKING ar THE INPUT FLAG, THE SCHEME NOES 

NOT WORK UNLESS oDT IS DOING guTPUT AND THE CASE I8 ALMOST ALWAYS THAT 
CO? $3 DOING OCUYPUT SINCE xv 78 ECHOING INPUT BUT THERE ARE CASES 


(§-Y 


DESCRIPTION OF NOTATIONew 


ALL NUMBERS IN THIS DOCUMENT ARE OCTAL NUMBERS UNLESS THEY 
ExPLICITLy ARE SUFFIXED By 4 "," IN WHICH CASE THEY ARE DECIMAL, 


&B JC CONSTRUCTSe= 

OCTAL NUMBERSwe NOTATION. <OCT> 
TRIS 18 AN OCTAL INTEGER IN THE RANGE 177777 TO A6B8007, 
It's USE I8 CONTEXT DEPENDENT AND THE ABOVE RANGE May 
AL80 BE FURTHER LIMITED By CONTEXT, 
THERE ARE SPECIAL CHARACTERS DEFINED TO REPRESENT USEFUL 


OCTAL NUMBERS WITHIN ODT'S GUTS, THESE CHARACTERS ARE 
7O BE USED INTERCHANGEABLY wITH OCT4lL NUMBERS, THEY ARE? 


Cc VALUE STORED IN USER'S CONSTANT REGISTER 

Q LAST OCTAL QUANTITY TyPEN 

; ADDRESS OF LAST OR CURRENTLY OPEN REGISTER 
VALUESe= NOTATION <VaL> 


<VAL> DESIGNATES AN EXPRESSION, WITRKOUT PARENtS, WITH THE 
FOLLOWING OPERATORS DEFINED, 


a SUBTRACTION, UNARY PINUS 
+,<SP> ADDITION 

e MULTIPLY By 5@ AND ADD 

° RELOCATION COMPUTATION 


inr ARATOREee 


VALUES ARE SEPARATED BY THE CHARACTER "gH 
AND By COMMANDS, 


NOTES: 

A SPACE Ig EQuIVALENy 70 & Plug FOR ADDITION, THIg ONLY Hag 
MEANING WHEN THE PRéEvinug CHARACTER WAS NOT A SEPARATOR 
wHICH SAYS YOU CAN TYPE ALL THE SpACES You WANT wHILE You 
ATTEMPT TO FIGURE OUT wHAT THE NEXT THING To DO IS, 


ADJACENT OPERATORS DO NOT EXIST, ALL OPERATORS ARE SEPARATED 


BY AT LEAST ONE NyLL WHICH OD7 LIKES 1O CALL A "O" (A TRUE 
MATHEMATICIAN MIGHT WINCE), 


f-s- 


MEwLSTER MANIPULATION COMMAND See 
OPENING REGISTERS=-~ 
OQ ww <VAL><OPEN>D 


THIS FORM OPENS THE REGISTER INDICATED BY <VAL> AND TYPES THE 
GONTENTS IN THE MODE SPECIFIED By THE <OPEN> COMMAND, THIS MODE 
REMAINS EFFECTIVE UNTIL ANOTHER COMMAND OF THI§ FORM Ig TYPED, 


FORM== <QOPEN> 


THE LAST OPENED REGISTER IS PRINTED IN THE MODE SPECIFIED, 
TYME MODE 18 EFFECTIVE FOR THIS ONE COMMAND, 


<OPEND 


weesa3fFhu 


CLOSE REGISTER COMMANDSee 
FORMm= <VAL><CLOSE> 


THIS FORM CAUSES 
OPEN REGISTER AN 


GPEN 
OPEN 
OPEN 
OPEN 
OPEN 


<VAL 
Oo THE 


AS OCTAL WORD 
AS OCTAL BYTE 
AS ANSITI wORD 
AS ANSIT BYTE 
AS RADIX 52 waRD 


> TO RE STGRED IN THE CURRENTLY 
ACTION SPECIFIED BY <CLOSE> To BE 


TAKEN, IF <VAL> TS NULL THEN NO DATA IS STORED AND ONLY 


THE ACTION IS TA 


OSE ree <CR> 
<LF> 
A 


aA 


v 


KEN, 


CLOSE 
CLOSE 
CLOse 
CLOSE 
THE C 
TAKEN 
AS , 
aS 

cLose 
OPENE 


AND NO §pECIFIC ACTION 
AND OPEN THE NEXT LoCaTIOn “OgWN" 
AND OPEN THE NEXT REGISTER "tpt 
AND OPEN REGYSTER SPECYFYED BY 
ONTENTS OF THE OPEN REGISTER 
AS A PC RELATIVE 4npRESS, 
BUT OPEN IS ABSOLUTE ACORESS 
BUT OPEN IS BRANCK CISPLACEMENT 
AND RE*OPEN REGISTER LAST 
0 By AND EXPLICIT OPEN COMMAND, 


15-6 


INTERNAL REGISTER REFERENCING 


FORMS== 


$N USER'S HARD REGISTERS, RGeR7, Deunca7 
§L. INTERNAL CONTROL REGISTERS 
SNL INTERNAL CONTROL TABLES WHERE? 
L IS THE CODE LETTER FOR THE SPECIFIC 
REGISTER OR TABLE, 
AND 
N- IS THE POSITIVE OFFSET TO THE TABLE, 


THIS IS A NUMBER Q@ceNee37 AND IT DOUBLED 
AND ADDED TO THE ADDRESS SPECIFIED 
By "L* 70 GEY THE CORE ADDRESS, 


DEFINITIONS OF Lee 


NOTES? 


CONTROL REGISTERSee 


USER'S STATUS REGISTER 

ODT'S RUNNING PRIORITY 

ARGUMENT REGISTER 

MASK REGISTER 

LOW MEMORY SCANNING REGISTER 

HIGH MEMORY SCANNING REGISTER 

USER'S CONSTANT REGISTER 

LAST QUANTITY TyPEH REGISTER | 
OLSK I/O BUFFER START ADDRESS (256, WORDS) 
ADDRESS OUTPUT FORMAT SWITCH 


ANOOTOe = re u)|e 


(THE ORDER ABOVE IS THE SAME AS THE ORDER 


IN MEMORY) 
CONTROL TABLESee 
8 Qea7  -RREAKPOINT ADDRESSES 
G Q=7 BREAKPOINT PROCEED COUNTS 
if g°7 RREAKPOINT INSTRUCTION STORAGE 
R 6=37 RELOCATION BASE ADDRESS OR SEGMENT NUMBER - 
T Qa3 CONSOLE/YTY DEVICE ADDRESSES 
U 20027 RELOCATION DISK UNITS (RK TYPE DIsk) 
U 32=37 RELOCATION DISK UNITS (RP TYPE OIsKk) 


OOT TREATS THESE CONSTRUCTS AS A METHOD OF GENERATING 

ADDRESSES AS Follows: 
THE OFFSET IS MULTIPLIED BY 2 AND ADDEN To THE ADDRESS 
SPECIFIEO BY THE CODE LETTER, THE WARD REGYSTER CASE 1s 
TRE NULL LETTER, 


THERE IS ONLY & MAXIMUM CHECK FOR THE OFFSET VALUE ATTACHED 
TO A TABLE REFERENCE, 


CONTROL REGISTERS CANNOT g¢ USED WITH OFFSETS, 


‘$-7 


"Te “GF EMENLANY (CONT'D) aoe 


REGISTER USaGEo~ 


A BRIEF DESCRIPTION oF THE USAGE OF SELECTED REGISTERS APPEARS 
BELOws 


$C TRE USER CaN PLACE & CONSTANT VALUE IN THIS REGISTER 
AND ACCESS IT py TYPING 4 "C4 AS PART OF a <VAL> 
CONSTRUCY, IT Is INTENDED 4g A wAy TO Cut THE TYPING 
NEEDED To GET THINGS DONE, wHEN ODT TS LOADED THE 
REGISTER "$C" Has qHE ADDRESS OF ODT'S STARTING 
POINT STORED THERE CTYPE "Cay, 


$Z THE ADDRESS OF THE OISK I/O BUFFER USED IN THE pISk LOK 
IS. KEPT SESE. tHe Use MAY CHANGE THIS AT ANY TIME, ODT 
ASSUMES THAT THE BUFFER IS 256, woRDS (S12, BYTES OR 
1082 OCTAL) IN LENGTH AND THAT THE FIRST wORD'S appRESss 
T3 IN "$7", TF THE CONTENTS OF "$7" ARE ZERO an 
ATTEMPT TO USE THE DIsk LOOK CAUSES oO0T To QUESTION 
YOu, , 


SF WHENEVER OOT TYPES an ADDRESS (BREAKPOINTS, SEARCHES, 
| OPENING LocaTzons, ETC.) IT CONSULTS WITH THE "FORMAT! 
REGISTER TO SEE TE Tue USER wANTS THE ADDRESS TyPEn 
IN RELOCAYABLE OR ABSOLUTE, IF "SE" Says tongn 
THAT MEANS AASOLUTE, AND SAVING "ZERO" MEANS RELOCATABLE 


$P OOT CAN RUN AT ANY CPY PRIORITY (AT LEAST FOR 4 WHILE), 
SETTING THIS REGISTER TO 4A H3776 
MEANS THAT ODy Ig 7O RUN AT THE PRIORITY OF THE USER 


DOES Noy CONTAIN ug "377" THE REGISTER'S CONTENTS 


OF "gpH, 
SYNTAX OF REGISTER REFERENCESe« 
BE WARNED OF THE FOLLOWING PROBLEM wITH ODT1§ SYNTAX, ODT USES 
LETTERS AS PART OF A VALUE AND USES LETTERS AS A DELIMITER, 
FOR EXAMPLE, 


$7G MEANS THE SEVENTH PROCEED COUNT, NOT GO AT 
REGISTER SEVEN, | 


THIS SHOULD CAUSE NO PROBLEMS WITH OprT AS IT STANDS BUT THE 


"I" AND #U" TABLE DESIGNATORS ARE NOT YET COMMANDS, IF THEy 
ARE EVER MADE INYO COMMANDS, BE CAREFUL, 


CE-S 


Ne ee AUT en ee ewe QF oe 


* t0CEED 


THIS COMMAND SETS THE CPU'S REGISTERS @=7, AND PS 
FROM THE USER'S ImaGE MAINTAINED BY ODT, THIS ACTION HAS THE NET 
RESULT OF STARTING THE USER'S PROGRaM, 


SYNTAXee 
<VAL>G SET THE USER'S PE TO «<VAL> 4ND 
START THE TARGET PROGRAM, 
G _ USE THE CURRENT SETTINGS OF THE USER'S 
REGISTERS TO SYART THE PROGRAM, 
NOTESee 


A "G" COMMAND SETS 8,1, MODE TO “"OFFH, IE, GO GOES|) 
ERRORS= ODD ADDRESS, 


FROM BREA, Wp i iii tke TLL ee wp sane 


USE THIS COMMAND 70 PROCEED FROM THE LAST BREAKPOINT HIT By 
ODT, THIS Is USED FOR THE NORMAL BREAKS #07 AND THE SINGLE 


SYNTAXee 
<VAL>P PROCEED THRU THE CURRENTLy 
ACTIVE BREAKPOINT <vVAL> TIMES 
BEFORE STOPPING AGAIN, 
Pp <VAL> DEFAULTS TO 4 IE NoT SPECIFIED, 
NOTESee 


A mP™ COMMAND sE73 §,1, MOOD 10 "OFFH, 


THE INSTRUCTION aT THE BREAK ADDRESS IS EXECUTED WHEN 
THE PROCEED TAKES PLACE, 


A "G" TO A BREAKPOINT CAUSES THE BREAK TO HAPPEN, 


WHEN A BREAKPOINT IS HIT AND MAY BE PROCEEDED THRU, 
ODT TYPES THE FOLLOWING? 


NBSAAAAAA WHERE 3 
N IS THE BREAK NUMBER, Qe7 
WHICH ARE USER SEy, AND 8 IS 
THE CODE FOR A SINGLE INSTRUCTION 
BREAK, 


IF OOT FIELDS a “TRAPH INTERRUPT AND HAS NO BREAKPOINT 
DEFINED FOR Thay LOCATION Ir yyPES “BEHW FOR THE ENTRY, 
THE USER PC Ig gfy 70 HE LOCATION FOLLOWING THE “TRAPH 


ERRORS» NO ACTIVE BREAKPOINT, 


/¢-§ 


mor ween tte YON COUNTID) ae 
SET A BREAKPOINT, eB ee OR ROME Me Bee we wees eeeweeaneseseecen 4B" ecan 


ALL BREAKPOINTS May ag CLEARED, SINGLE ONES CLEARED, AND 
INDIVIDUAL ONES SEY VI4 THE "Rn COMMAND, 


SYNTAXee 
B CLEAR aLL ARREAKPOINTS 
<OCT>86 CLEAR ONLY GREAKPOINT weOCTs 
<VAL>3<OCT>8 SET BREAKPOINT #<OCT> AT LOCATION 
<VAL>, | 
<Vauayo LET ODT PICK THE BREAKPOINT TO SET. 
AT LOCATION <vAL», 
NOTESe~s 
THERE ARE THREE CONyROL TABLES ASSOCIATED WITH & BREAK? 
SNB THE ADDRESS OF THE BREAKPOINT, 
$NG THE PROCEED COUNT OF THE BREAKPOINT, 
$nI THE CONTENTS OF THE ADDRESS AT THE 


BREAKPOINT WHILE THE USER 18 RUNNING, | 
O<eN<e7 WHERE N IS THE BREAK # 


IF yOu SHOULD PERCHANCE GET INTO OD? wITH BREAKPOINTS 
IN YOUR OWN PROGRAM, AND [7 Ig EASY TO DO, YOU FiIpgt 
MIGHT TRY LOOKING AT THE wyn TABLE To FIND THE 
CONTENTS OF THE LOCATIONS IN THE "R" TABLE THaT 

GoT SCREWED up, CLEARING PREAKPOINTS In THIS STATE Ig 
OrSASTER, TRY LOOKING FoR "316 IN MEMORY FOR A START, 


ERRORS= BAD BREAKPOINT NUMBER, ODD ADDRESS, RAN OUTTA BREAKS, 


SINGLE INSTRUCTION MODE, Wot Cerone neon eB eee oem eee esasnnanee gn enue 


THIS COMMAND SETS THE MOOD WHERE ODT TRAPS ON EACH INSTRUCTION 
EXECUTED AS IF IT wERE a BREAKPOINT, THE "S$" COMMAND CAUSES 
AN INSTRUCTION TO BE EyECUTED IN THIS MODE, 


SYNTAXwe 
$ EXECUTE & SINGLEC1) INSTRUCTION AND 
THEN BREAKPOINT WITH #8, | 
<OCT>S EXECUTE <OCTs INSTRUCTIONS AND THEN 
BREAK WITH #8, 
NOTESw= 


THE USUAL PROBLEMS oF EXECUTION OF CERTAIN INSTRUCTIONS 
WITH THE "TeBITY ON ARE SOLIDLY ENTRENCHED IN THIS ONT, 
THE STACK OF ODT Ig ABOUT au WORDS IN LENGTH AND IF 


ERRORS= NONE CHECKED FOR BY ODT, 


/8-/0 


AVURESSING COMPUTATION AND CONTROLeao 

COMPUTE. OFFSETS, “gn ett TLL ee vga eovnae 
THIS COMMANDS PRINTS THE PC RELATIVE AND BRANCH DISPLACEMENT 
ATWIXT YwoO LOCATIONS, IT DOES Ty CORRECTLY wHICH } NEVER 
AM QUITE ABLE TO Do, 
SYNTAX#a 


<VALD>O | COMPUTE OFFSETS FROM 4." TO ThE 
ADDRESS <vai>, 


<VALL>PCVALDO COMPUTE OFFSET FROM <VAL{> TO «<VAL> 
IF <VAL> I8 NULL OpT THINKS ZERO, 

NOTESee 
THE OFFSETS ARE PRINTED oN THE LINE WITH THE COMMAND 
AS 16 BIT NUMBERS, THIS Is 50 THAT YOU CAN FIGURE HOw 
FAR OUT OF BRANCH DISPLACEMENT You ARE, 
THE PC RELATIVE OFFSET IS PREFIXEOD BY A Wt AND 
THE BRANCH DISPLACEMENT 18 PREFIXED By a Hou, 
TO SEE = AS + TyPE NeoQan, 

ERRORS» NONE POSSIBLE, 

KOMPUTE RELOCATION VALUE, WK OO OO MOO O OMe E TSE remeron aenncee WK it @eounn 


THE RELOCATABLE EXPRESSION FOR GIVEN ADDRESSES IS TYPED BY THIS 
COMMAND, THE CORE (NOT DISK}) RELOCATION REGISTER AND OFFSET 
ARE DIgPLayED INDEPENDENTLY OF THE MODE IN "gFe, 


SYNTAXee 
<VAL>P<COCTOK COMPUTES AND TYPES THE RELOCATION 
, EXPRESSION USING REGISTER «OCT» 
AND THE ADDRESS <yAL>, 

If <VAL> IS NULL THEN THE CURRENT LOCATION 
via nyu 18 USED, IF <OCT> I8 EMPTY THEN ODT 
SCANS THE RELOCATION TABLES LOOKING FOR THE 
BEST FIT, 

NOTES=« 


THE INFORMATION PRINTED By "Kn FOLLOWS ON THE SAME 
LINE as FOLLOwss PBReLLLLLL 
WHERES R IS THE RELOCATION REGISTER USED TQ 
GET THE OFFSET LL. 


ERRORS» NO RELOCATION REGISTERS DEFINED, 


SY¥-// 


ADDRESSING COMPUTATION AND CONTROL (CONT'D) =@ 
SET RELOCATION REGISTER, aRn Secs eeeseeeseanenseseuncasceunaeaee HR pease 


THERE ARE 42 RELOCATION REGISTERS AnD 22 UNIT REGISTERS 
ASSOCIATED WITH THIS COMMAND, YOU SHOULD CONSULT THE "DISK LOOK" 
DESCRIPTION WITHIN THIS DOCUMENT FOR THE NITTY@GRITTY, IN 
SHORTe= "RN REGS, We7 ARE CORE, 19017 ARE RF DISK, 24-27 ARE 
RK DISK, AND 30=37 ARE RP DISK, 
"U" REGS @=17 DOMIT EXIST, 20°27 ARE Rk yNIT REGISTERS, 
AND 30°37 ARE RP UNIT REGISTERS, 
THE VARYTATIONS ON THE "RW COMMAND SET AND RESET THOSE 62 REGS, 


SYNTAXee 
R ROSEY aii FR REGS. TO #1 AND ALL "UM TO 
a, 
<UCT>R RESET ONLY THE REGISTERS SPECIFIED BY 
<OCT> TO =1 AND @, 
<OCTI>I<VAL >; <OCT>R SET RELOC REGISTER <0CT> To 


CONTAIN <VAL> AND SET UNIT 
REGISTER <OCT> TO CUNTAIN 
<OCTIi>, 


THE ABSENCE OF AN ARGUMENT TO THE MULTIPLE 
FORM OF THE "RY COMMAND MEANS THAY ODT SETS 
THAT vALUE TO @, UNIT REGISTERS Qe17 ARE 
DEFINED 70 ConTAIN ZERO'S, 


NOTESee THESE REGISTERS MAY BE ADDRESSED DIRECTLY 48 INTERNAL 
REGISTERS BUT THE IT8 NO RANGE CHECKING DONE BY THE 
INTERNAL REGISTER ADDRESSING CoMPUTATION ROUTINES 
SO IT IS RECOMMENDED THAT YOU USE THE "R" Command 
TO DO TRE SETTING AND THE "§R/Sy" FORMS TO DO 
LOOKING, 


ERRORS= yOU HAVE SPECIFIED a REGISTER THAT DOSEN'T ExIST 


NOTES (AGAIN) w= 
ODtT'g RP DISk NRIVER COULDN'T CARE LEsg apOyr WHETHER 
YOU HAVE A BUNCH OF RPB2'S CIISING RPL{ CONTROLLER) Op 
RPBS'g CUSING THE apitiet CONTROLLER) CAUSE THEY Look 
ALIKE oN THE ORIVER LEVEL, HowEVER, THE RP@3 IS A 
BIGGGGG NIgKx ¢Rv,vae BLOCKS) AND IT I§ HARD To REPRESENT 
80,000 THINGS WITH A 16 ByT RELOCATION REGISTER, TwEk 
PROBLEM DOESN'T Come UP ON AN RP@2 WITH A MERE 40,000 
BLOCKS, THE PROBLEM IS RESOLVED BY A SPECIAL HACK WITH 
THE RP UNIT REGISTERS (3@=37U),. UNITS B=? (CONTENTS OF 
THE APPROPRIATE UNIT REGISTER) ARE USED TO INDICATE THE 
LOWER HALF OF aN RP@3, UNITS {2-17 REFER TO THE UPPER 
MALF, wHAT HAPPENS IS THaT 40,008, 18 ADNED TO THE 
RELOCATION SEGMENY NUMBER (CONTENTS OF 3e37R) IF YHE 
CORRESPONDING UNIT REG (38=37U) Is >s 10, THE RP ORIVER 
DOES IT'S WoRK IN DOUBLE PRECISION(32 BITS), FOR EXAMPLE 
IF 31U815 AND 31R84@ AND YOU COMMAND ODT To OPEN A worD 
WITH .31,26/ YoU wILL GEY WORD 26 OF SEGMENT NUMBER 
40,008,+10847,008 ON RP UNIT 8 CIF Yoy DON'T BELIEVE ME, 
TRY IT), 


et ho 


ee ee ee ee een os oe 
WORD SEARCH with MASK, Ay ® TORO MONO PO RR eee te Settee Bes ee casnee Wy aan 


ALL LOCATIONS BETWEEN THE LIMITS DEFINED BY “S$LF AND “gHn 
THAT ARE EQUAL TO THE VALUE IN MSA" UNDER THE MASK IN 
"SM ARE PRINTED IN THE MODE SET BY THE LAST OPENED 
LOCATION, THE DATA IN CORE IS "aNpEcH WITH THE MASK ANDO 
THE VALUE IN "$A" Ig UANDED® AND THE COMPARE 

TS MADE WITH THE MASKED VALUES, 


SYNTAXee 
<VALI>}PEVAL>W SET "SM" TO <vVAL{> AND 
SET "ga" YO <VAL> AND 
PERFORM THE SEARCH, 


W | USE THE CURRENT SETTINGS OF “SA AND 
"SM® TO DO THE SEARCH, 


IF EITHER <VAL{> OR <VAL> IS NULL THEN THE 
CORRESPONDING REGISTER IS NOT SET, 


NOTESe= 
THE SEARCH MAY BE INTERRUPYED BY THE <RO> COMMAND 
DESCRIBED LATER, 
ERRORS» NONE, 
NOT WORD SEARCH WIT MASK, wy Qe Pees rset ewaneenaneaeeneusave RNY esae 


THIS COMMAND OPERATES SIMILARY TO THE "Ww" COMMAND EXCEPT 

THAT ALL LOCATIONS THAT ARE DIFFERENT UNDER 

THE MASK ARE PRINTED, YHE SyNrAx IS THE SAME aS FOR "wt, Save 
FOR THE COMMAND HISELF, 

SYNTAXee 


N SEE THE "wt COMMAND FOR REGISTER 
SETTINGS, . 


NOTESee 
THE SEARCH May BE INTERRUPTED By THE «RO» COMMAND, 


ERRORS» NONE, 


/#-13 


MEMORY SEARCHES (CONT'D) ee \ 


EFFECTIVE ADDRESS SEARCH WITH MASK, "E" wcenenacnencaccecnaccs HER pewe 


THE "E* COMMAND PRINTS ALL LOCATIONS BETWEEN "SL" AND "SH" THAT 
RELATE TO THE "$A" VALUE AS FOLLOWS?! 


EQUAL, SAME ABSOLUTE ADORESS, 


PC RELATIVE, THE LOCATION IN CORE IS ASSUMED TO RE 
A RELATIVE (MODES6, REGISTER#7) ADDRESS, 


"BR® DISPLACEMENT, THE LOCATION IN CORE IS ASSUMED 
TO BE & CONDITIONAL BRANCH INSTRUCTION, 


SYNTAXeea 
E SEE THE "W" AND "N™ COMMANDS FOR VARIATIONS 


NOTES== 
THE SEARCH MAY BE INTERRUPTED BY THE <RO>.COMMAND, 


THE EFFECTIVE ADDRESS IS ALSO A MASKED SEARCH, THIS IS 
TO ALLOw RANGE SFARCHES, 


PLEASE NOTE THAT THE "E" SEARCH WILL ALMOST ALWAYS 
GIVE wFALSE DROPSHe, 


ERRORS» NONE, 
« A LEFT OVER FROM THE OLD DAYS IN J,R, 
LIST MEMORY ON DEVICE, a SRSR FSF ASSSSHTESHHAHRHRHBEATSCSOSHSEHOSSETAR ol ha euvne 


THE CONTENTS OF THE CELLS ATWIXT "SL" AND "SH" AND LISTED 12 
UP ON THE SPECIFIED DEVICE, 


SYNTAXae 
COCTDP<VALD>PEVALY>L <OCT> IS THE OUTPUT DEVICE WHERE 
® OR NULL IS THE CONSOLE AND 1} 
IS tHE LPit, <yvAL> AND <yALi>, 
IF PRESENT SET "$L" AND "$He 
RESPECTIVELY, 
NOTESe- 


THE "$L" LIMIT Ig ANDED wITH A "1777704 APYER 
BEING PICKED UP AND BEFORE uSE, 


THE *L" COMMAND MAY BE INTERRUPTED AT ANY TIME VIA 
THE <RO> COMMAND, 


THE LISTING IS PRINTED IN THE MODE SET BY THE LAST 
OPENED REGISTER, 


ERRORS NONE, 


(Soe 


MISC COMMANDSe= 


PILL MEMORY wITh wORDS, ash ORCC Ce RRM M NC Cet ew wCwenanenennn npn eave 


~ 


FILLS MEMORY WITHA GIVEN WORD,. STARTS AT THE LOCATION SET IN 
THE REGISTER DEFINED BY "SL" AND STOPS aFTER THE LOCATION SET 
IN THE REGISTER DEFINED AY “gH” Has BEEN FILLED, 


SYNTAXe« 
F USE THE CONTENTS OF "gan TO DO THE FILL 
FROM "$L" TO *$H" INCLUSIVE, 
<VAL>F = SET THE REGISTER "$a" 10 eValy AND THEN 
DO AS ABOVE, 
NOTES@== 


ERRORS» AL, YOUR OWN, | 


TIF YOU HAVE A PoP}qy WITH LOTS OF DIFFERENT DEVICES, LIKE 

A TV SET, USE THIS COMMAND TO MAKE ONT USE THE DEVICE FOR IT! 
CONSOLE I/0, THE OLD CONSOLE STaTUS IS RESTORED AND THE NEW 
STATUS I8 PICKED UP WHEN CONSOLES ARE SwITCHED, 


SYNTAXee | . 
<VAL>T USE THE 1/0 PAGE ADORESSES BEGINNING AT 
<VAL> FOR CONSOLE 1/0, 
T - RESEY THE 170 DEVICE TO THE STANDARD 
PDP=1! CONSOLE TTY ASSIGNMENT (177569) 
NOTESee 


THE GIVEN ADDRESS 18 ASSUMED TO BE THE REaD STATUS 
REGISTER aDORES8S AND THE REMAINING THREE DEVICE 
REGISTERS ARE ASSUMED 70 BE YHE NEXT THREE WORDS 
IN THE I/0 PaGE, THIS, I AM ASSURED, Ig NOT AN 


ASSUMPTION BUT A DEFINITION, WE ALL KNOW WHAT THAT MEANS, 


ERRORS= ALL YOUR OWN, 


THE EXPRESSION OR VALUE ON THE LEFT oF THE "a" IS PRINTED 
AS AN OCTAL WORD, 


SYNTAXee 


<VaL>a PRINT <VAL> AS AN OCTAL WORD, 


1 §-1S— 
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MISC COMMANDS (CONT'D) == | Lo 
CANCEL AND RETURN, UERODN senenwenwcannascwensensenecenescasaun N"ERODN « 


THIS CHARACTER IS ABLE TC STOP THE CURRENT ACTION OF OOT, 
NOT TO BE CONFUSED wITH THE USER, AND RETURN TO THE COMMAND 
INPUT ROUTINE VIA THE ERROR ROUTINE, THE CHARACTER IS TESTED 
FOR IN THE TYPE*AREAD ROUTINE AND WHEN DETECTED GOES 

TO THE ERROR ENTRY AND THIS RESETS TYPE*AHEAD AND CAUSES 

OpT TO WAIT FOR SOMETHING TO pO, 


SYNTAXe= 
<RO> STOP ODT AND walT FOR COMMAND, 
NOTES=« 


USE THIS COMMAND TO STOP SEARCHES SINCE THE TYPESAHEAD 
USES THE QUTPUT ROUTINE TO LOOK FOR INPUT, 


4¥-/6 


OVERVIEW OF THE "DISK LooK® | 1; 
THE MOISK LOOK" EXTENSION TO GOT USES AN EXPANDED 
VERSION OF THE RELOCATION FACILITY, IN GENERAL THE USER TS ABLE 
“~ OPEN ONE WORD ON A GIVEN DISK, EXAMINE TRAT KORD, MODIFY AND CLOSE 
AT WORD, THE SAME HOLDS FOR AYTES, 


THE DISK MAY BE OPERATED UPON IN THIS MANNER ONLY, AND NO 
ABILITY TO SEARCH DIRECTLY OR OTHER SUCH OPERATIONS 18 IMPLIED, 
THE ASTUTE HACKER May FIGURE SOME THINGS OLT THOUGH, 


THE USER IS GIVEN THE ABILITY TO CONTROL THE BUFFER USED IN THE 
DISK LOOK FACILITy, THE INITIAL BUFFER DEFAULTS TO THE 256, WORDS 
FMMEDIATELy PRECEEDING ODT'S wORKING STORAGE, 


THE DISK IS ADDRESSED VIA AN EXTENSION OF THE ODOT RELOCATION 
SCHEME, THIS WILL BE SPECIFIED IN DETAIL A COUPLE OF PAGES LATER, 
THE SCHEME ALLOwS THE YSER TO SET UP TO EIGHT BASES ON AN 
R= ANDO. RK CEIGHT FOR ALL EIGHT POSSIBLE UNITS) 
ND THEN SPECIFY UP To A 16, BIT OFFSET TO THAT BASE, THE BASE 
1g A 16, BIT SEGMENT NUMBER IN THE STANDARD RSTS FORMAT, 


4¥-1/7 


ieee. Satie, Jan eo we~'s BUUN~ FAIENSIONG@® 


THERE ARE 20 RELOCATION REGISTERS DIVIDED INTO GROUPS as 
FOLLOWS! 


~ CL . REGISTERS, NUMBERED G=7 (S@R@g7R) 


EACH REGISTER CONTAINS A 16, BIT CORE RELOCATION CONSTANT, 
°F DISK REGISTERS, NUMBERED 10017. ($10R-$17R) 


EACH REGISTER CONTAINS ONE 16, BIy SEGMENT NYyMBER 
(A SEGMENY BEING a 256, wORD BLOCK OF DISk ALA RSTS) 


THERE ARE 20 ADDITIONAL REGISTER Paras DEFINED AS FOLLOWS; 
Re UNIT AND DISK REGISTERS, NUMBERED 20027 


S2@R-$27R RK ADDRESS (SEGMENT) REGISTERS 
S20 ied RN UNIT REGISTERS 

RP UNIT AND DISK RECISTERS,, NUMBER Jge37 
$3 “Re$37R RP ADDRESS (SEGMENT) REGISTERS 
$38U-$37y RP UNIT REGISTERS 


THE UNIT REGISTERS CONTAIN THE UNIT NUMBER (Q=7 ON RK nR RPa2) 
(Oe17 ON RPGS) WITH ITS ASSOCIATED ADDRESS (SEGMENT) REGISTER, 
THE ADDRESS REGISTER CONTAINS A 16. BIT SEGMENT NUMBER. 


THE UNIT REGISTERS ARE DEFINED TO CONTAIN & ZERO FOR 
ALL RELOCATION REGISTERS NUMBERED gece 


~0 1/0 BUFFERS- 


DUE TO VARIOUS aND SUNDRY CHARACTERISTICS OF DISKS AND RSTS aLlL 1/0 
~— DONE BY THE DISk LOOK FACILITY IS DONE IN agg WORD UNITS, THIS 

SCHEME REQUIRES A 480 WORD BUFFER, AND ODOT USES THE VaLuUE STORED IN 

THE REGISTER ADDRESSED By $2 TO DO ITI8 T/G, THE INITIAL VALUE IN 

$Z IS SET TO POINT TO A BUFFER THAT IS DEFINED 16 EXIST IN THE 

488 WoRDS ImmEDIATELY BEFORE THE SpACE USED BY ODT For IT!'5 STACK, 


DISK I/0 DESCRIPTION©@ 


| IT IS DEEMED IMPORTANT THaT THE USER BE ABLE TO FIND ouT 
~—wWHAY IS DONE 7O THE DISK wHEN HE USES THE MISK, fy 18 ESPECAILLY 
$0 IF THE ysER Tg DEBUGGING a DISK SERVICE, wHEN EVER OOr ACCESsEés 
THE DISK THE FoLLowING ORILL Ig EXECUTED: 


SAVE THE CALLING uPga, 

WATT UNTIL THE DISK TS NOT Busy, 

SET PRIORITY TO azn 

If OISk Ig BUSY AGAIN RESTORE CALLING "Pg" aNnp START OVER, 
ISSUE A CLEAR CONTROLLER COMMAND TO THE DISK, 
AWAIT UNTIL READY AGAIN 

PERFORM THE READ OR WRITE 

WATT UNTIL READY 

RESTORE THE CALLING "pan VALUE 

CHECK THE DIsk FOR ERRORS, 

ExIt, 


— THE OISK 1/0 IS DONE IN THIS MANNER 80 Tray CONSISTENCY IS 


INSURED, I7 APPEARS TO BE IMPOSSIBLE 10 COMPLETELY SAVE AND RESTORE 
THE OIak gatus g0 I Have TAKEN THE OTHER EXTEREME, 


L4-19V 


LOURING af TRINGSae 
GENERAL FORMe== 
<OCT1>,<OCT><OPEN> 
°0Re 
<VAL><OPEN> 


<OCTi> IS THE RELOCATION/UNIT PAIR TO BE USED 
(RANGE G037), | 


<OCT> IS THE OFFSET TO BE ADDED To THE RELOCATION 
UNIT PAIR SPECIFIED (RANGE 8°177777), 


IF THE CONSTRUCT "<OCTy>,¥" IS ABSENT, THEN CORE [5 ADDRESSED, 


FOR EXAMPLE: 

@38)0R 

O,1462/ Xxx 

HaS THE SAME OUTPUT (NOT EFFECT) a8 TYPING? 
1462/ XxX 


IF <OCT1> IS ABSENT THEN THE VALUE DEFAULTS TO ZERO, 


FOR EXAMPLE? 
By,1324/ xxx 
HAS THE SAME EFFECT (AND OUTPUT) aS TYPING? 
ol3S2d/ XXX | 


Pork EXAMPLE ee 


TO LOOK aT THE CORE IMAGE OF RSTS LOcaTED BEGINNING IN SEGMENT 61(8) 
AND TO EXAMINE LOCATION 17362 OF THE CORE IMAGE I WOULD TYPE THE 
POLLOWINGs (FOR CIL ON RK UNIT @) 


617 20R I.E, SET UNIT A BY DEFAULT, RELOCATE TO SEGMENT 61 
— 8B,17362/ xxx OPEN WORD 17362(8) FROM Top OF SEGMENT 64 
WHICH IS ACTUALLY WORD 362(8) OF SEGMENT gfta? 


THE OPENED LOCATION MAY BE OPERATED UPON AS IF IT WAS CORE, 
(WHICH IN FACT IY 181) 
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GUT COMMAND SUMMARY, LETTERS AND NUMBERGee 


LETTER 


{ 


a] a a ~@22 0 UV oo a 2 me. Gm rosa 


G07 


COMMAND 


BREAKPOINY SET/RESET. 


CONSTANT 
EFFECTIVE ADDRESS 
FILL . 
GO 


RELOCATION VALUE COMPUTE 
LIST MEMORY 


NOT WORD SEARCH 
OFFSET VALUE COMPUTE 


PROCEED 

QUANTITY . 
RELOCATION SET/RESET 
SINGLE INSTRUCTION 
ALTER ConSoLE Try 


WORD SEARCH 


OIT's 


REGISTER 


ARGUMENT 
BKPY ADDRESSES (087) 
CONSTANT 


FORMAT CONTROL 

BKPT PROCEED COUNTS (687) 
HIGH SCAN LIMIT 

BKPT INSTRUCTION (087) 


LOW SCAN LIMIT 
MASK 


ODT PRIORITY 
QUANTITY 

RELOCATION (0-27) 
STATUS WORD 

TTY ADDRESSES (0=3) 


UNIT REGISTER (29827) 


DISK LOOK BUFFER 
USER REGISTERS (007) 
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ODT COMMAND SUMMARY, CHARACTERSe= 


2] 

CHaRacree ACTION 

OPEN OCTAL AYTE 

OPEN OCTAL wORD 

OPEN ANSIT BYTE 
" OPEN ANSII wORD © 
% — OPEN RADIX 58 wORD, 3 CHARACTERS 
<CR> CLOSE LOCATION 
4LFo CLOSE, OPEN NEXT IN + SEQUENCE 
hs CLOSE, OPEN NExT IN » SEQUENCE 
i CLOSE, OPEN PC RELATIVE ADDRESS 
@ CLOSE, OPEN INDIRECT oR ABSOLUTE 
> CLOSE, OPEN OFFSET as BRANCH 
g: ¢ RETURN TO LAST EXPLICTILY OPENED LOCATION 
bp SALTD REGISTER REFERENCE PREFIX 
3 ARGUMENT SEPARATOR 
’ RELOCATION OPERATOR 
¢,<SP> ADDITION OPERAyOR 
° SUBTRACTION OPERATOR 
e MULTIPLY BY 5@ AND ADO 
F CURRENT PLACE ADORESS 
s TYPE LEFT SIDE ON RIGHT 
<R0> CANCEL COMMAND AND RETURN 


ERROR WARNING 


UNUSED CHARACTERS (NON@ALPHA)@= 73 ¢ 12?8:8689 


UNUSED LETTERS IN COMMANDS == ADH IJMyyxyz 


r''NUSED LETTERS IN REGISTERS == DE JK NOVWX Y 


“LETTERS JUST PLAIN UNUSED we Dy Vx y 


LETTERS TO BE CAREFUL WITH we f U 
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BASIC - PLUS FILE PROCESSING 


Theodore R. Sarbin 
Digital Equipment Corporation 


INTRODUCTION 


These notes were prepared to introduce the BASIC programmer to the use of 
files in a RSTS system on the PDP-11. Most of the language features of 
BASIC-PLUS are used and it jis assumed that the reader is familiar with 
them. For those who know BASIC but not the extended language features a 
terse. summary is provided in Appendix A. A more complete exposition is 
included in the BASIC-PLUS language manual. — If eee is any difficulty 
in understanding the example programs then the language manua } should be 
available for consultation. When reading these notes the temptation to 
just read the text and not to attempt to understand the example programs 
should be avoided. whe wxanpies and diagrams are integrated with the 
text to such an extent that there is little benefit to be gained — 


just reading the text itself. 
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RSTS FILE PROCESSING 


: ' 
. 


1. GENERAL 

There are fundamentally three methods of performing input/output operations 
in BASIC-PLUS. They are serial input/output, virtual array, and "Record 
10". The first type is achieved through the use of the INPUT and PRINT 
commands; virtual arrays are defined through the use of the DIM statement: 
and “Record 10" (which e something of a mis-nomer) uses the GET, PUT, 
FIELD, LSET and RSET commands as well as the functions; CVTxx, CHR$, anc 
ASCII. All types of input/output operations take-dse GF the OPEN and CLOSE 


commands. 


.2@. DEVICE NAMES, FILE NAMES, AND LOGICAL UNITS 

1/0 operations in BASIC-PLUS are designed to be as device independent as 
reasonable. Thus in the I/0 statements there are no specific references to 
devices. Instead, each statement contains a reference to a logical unit or 
“channel".- (This is strictly a conceptual channel which should not be con- 
fused with a hardware device called a channel).: Each "channel" is simply a 
number from one to twelve which potentially identifies the specific device 
which is to perform an I/O operation. Thus in one program logical unit or 
channel 3 could be the line printer and channel 11 the card reader, while 
in another program channel 3 could benagtape unit #2, channel 1 the paper 
tape punch and channel 12 a file on the disk. The association of the 
specific device with a channel number is done with the OPEN svatenent.. The 
OPEN statement specifies a device, if necessary a file name, and the chan- 
nel number to associate with that device. The form of the conmand is: 


100 OPEN file name AS FILE n 
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The file name is a statement which completely describes where the data is 
_ to be found or put. It specifies the physical device as well as the name 
that is to be assigned to the information. The complete file name consists 


of the following parts: 


DV: ss NAMEXX.. EXT [111,222] £60) 


Device File and Project, Protection 
Name Extension Programmer Code 
Names Number 


The Device Name specifies the name of the device on which the file is locat-’ 
ed. It also may specify the unit number. Thus a file might be located on 
the nunber three cartridge disk and would be referenced as "DK3:". A list 
of device names can be found in the language manual. If no device name is 
specified then the public disk is assumed to be ciao referenced. Most of 
the examples cited in these notes use the public disk for simplicity but in 
real applications it is uncommon to use other than private disks for produc- 


tion data files. 


: The File Name and Extension specify the name of the data. The name itself 
is any sequence of six Be deco idence from the set of letters and numbers. 
A filename ned not be specified when ihe device is of the type which does 
not recognize file names. (The only devices which do recognize filenames 
are disks, DecTape and, in some cases, Magnetic Tape). The only require- . 
ment about the filename is that it be meaningful to those who iia it. The 


extension is a three character field which is usually used to describe the 


contents of the file. An extension of ".BAS" means that the file contains 


a BASIC-PLUS source program and an extension of ".BAC" means that the file contains 
a BASIC-PLUS compiled program. The programmer can assign any file extension 
he wants as long as it is meaningful to him. He need not assign any ex- 
tension at all. The file "ABCDEF" is unique and distinct from "ABCDEF.BAS" 


or any other file with "ABCDEF" as the file name and an extension. 
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The project-programmer number field specifies in whose account the file 

| is to be found. If it is omitted (and it usually is) then the system 
assumes that the account that the job is logged in under is the account 
that the file is or is to be, stored in. Writing into a file stored. under 
seneone else's sccount is pescibiecouly if he has explicitly permitted 
that. Creating a file in someone else's account is generally not poss- 
ible. (It can be done only by a privileged user. The System Manager's 
Guide contains a discussion of privileged users.) 

The last field is the protection code. This determines who can or cannot 
access the file. It is only meaningful when the file is being created. 
It is described in the Language manual and need not concern us further 
here. | 

The file name is specified either as a string literal (the file name in 
quotes) or as a string variable which contains the filename. As an 
example the following could be used: 


100 INPUT "WHAT IS THE INPUT FILE'S NAME", A$ 
110 OPEN A$ AS FILE 4 


In this case the user of the program supplies the file name at the time the 
program is run. Then in the OPEN statement is simply a number from one to 
twelve or a variable which contains such a value. To terminate the assoc- 
tation of a device and a channel we use the close statement and specify the 
channel number to close. For example: | 

100 CLOSE n 
alternatively we can close several channels in one comnand: 

100 CLOSE m, n, o | 
The open and close statements have several other options which will be des- 


cribed later but these statements create and terminate an association between 
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device and/or file names and numbered logical units or channels. Thus by ~ 
| changing the definition of the device or file for a specific channel we can 


change the devices the program uses without revising the program. 


3. SERIAL INPUT AND OUTPUT 
This is the simplest form of input/output. Whatever device is. in use is 
simply treated as if it was a (possibly very fast) teleprinter. Where we 
learned that to print on the teleprinter we used the PRINT statement we now 
make use of the scme statement but specify on which channel to print. Of 
course it is necessary to first associate a device i file with the channel 
by means of an OPEN statement. Thus to print a table of squares and square 
roots on the teleprinter we would have used the program: 

100 FOR I = 1 TO 100 


110 PRINT I, SQR(I), I*! 
120 NEXT I. 


FP print the same table out on the line printer we would use the program: 


480 OPEN "LP." AS Fite = ITHIS ASSOCIATES THE LINEPRINTER 
a | | IWITH CHANMEL NUMER = 
a FOR t=1 TO 168 START THE LOWS 
418 FOR {=1 To ibe VSTART THE ep t aa ds 
120 PRINT #2. 1, SGRCLO, I+] (THIS DOES THE PRINTING 
Se MEXT I eSTOr THE LODE = 
14a CLOSE 2 MPERMINATE THE ASSUCTATION 
4.56) END | 
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To write a file of names and addresses onto the disk we might use the 


following program: 


183 OFEM "NAMES. GAT" FOR QUTPUT AS FILE 2 (CHANNEL INITIALIZATION 
429 INPUT “HOM MANY NAMES"; fy PE INC: GUT HOR MANY HAMES 

120 PRINT #41, NE IAG PRINT IT INTO THE FILE 
126 FUR IX = 4% TO MY ISTART THE LOOF 

449 PRINT “INPUT THE NAME" (ER THE INFORMATION 
4°9 IHEUT LINE NE (On EACH NAME AND 

468 PRINT “INPUT THE NUMBER AND STREET" IAIND ALDRESS 

176 INPUT LINE AE | ; 

4° 3 PRINT “INPUT “HE CITY. STATE, AND ZIP CODE" 

“46 INPUT LINE C+ - , (HOM IT CAN BE QUTPUT 
98 PRINT #41, NS; AS C$; SPRINT IT INTO THE FILE 
248 NEST IX ‘END THE LOOP 

226 CLOSE 1 

230 END 


You will notice that a jay lene has been added to the OPEN: statement. 
When we specify that a file is for OUTPUT that means that this is a new 
File and any previous files of that name should be deleted first. Now 
suppose that we want to use this file to print on the lineprinter all those 
names and addresses for which the ZIP code begins with a 9 (i.e. those in 


California). The following program would do that: 


20 OPEN "NAMES. DRT" FOR INPUT AS FILE = ISET WE CHANMEL © AS THE FILE 
420 UFEN "LP: AS FILE 5 (AND CHANMEL S GS THE LINE PE TR 
426 INFUT #2. NE IGET THE NUMBER OF FILE ENTRIES 
420 FOR [2 = 4% TO NK ISTHET THE Loe 
146 IMPUY LINE #2. AS¢IE> FOR IM=1.h To 3m MGET OME ENTRY 
450 JM = LENCHECER DS : 
CHSJE-LE UNTIL MIDCHECEMS, JM. dpe" 
Qe JE = Oy . LOOK FOR THE ELF CODE 
{64 PELHT #5, ASCO; FOR EK=S46 TO =é 
IF MIDCAECEMo, UHELM, 2¢o=¢o° AND J¢cDbon 
IE INT OM LINE PRIF 
HY’ SYP CODE 16 SHME 
470 NEMT LM | ISTO THE Lic 
180 CLOSE 3,5 : END MALL OUNE 


yet 


The previous program is intended as an example. Of course if it were a real 
~ application we would want to do more checking for valid data and probably. 
at the time the data was entered. Also you will notice a new specification 

in the OPEN statement. When we specify that a file is to be opened for 

INPUT that means that we expect the file to already exist and that if it 

doesn't then that is an error and the program should not proceed. If we 

specify neither FOR INPUT nor FOR OUTPUT then the system will use the file 


of the specified name if one exists and if not it will create one and use 
it. (A somewhat anomalous situation exists here in that a file may be opened 


FOR INPUT (ie: it must exist) and then we can perform output operations on it 

or we can open a file FOR OUTPUT thus creating it and later in the same program 

we can read it.) At this point we have seen how to associate the name of a device or é 
file with a logical unit ss channel number and how to access devices and 
files in a serial manner. Next we will take up the two methods of accessing 


data randomly. 


4. VIRTUAL ARRAYS 

This is a very simple technique for accessing disk files. We simple equate 
files on the disk with dimensioned arrays and treat them in the program as 
if they were Simple arrays. Thus we can associate the name of a disk file 
with an I/0 channel through the use of an OPEN statement and then associate 
the name of an array with its size and with the I/0 channel through the use 
of a DIM statement: 

Thus: | 


100 OPEN "FILE.DAT" FOR INPUT AS FILE 2 
110 DIM £2, A&%(10Z4), B(1024) 


The above statements simply state first that an association is to be made bet- 
ween the file "FILE.DAT" on the public disk and channel two and that the file 


is to already exist. Then we say that the file is a virtual array whose names 


Kf 


are to be Af(n) and B(n). Thus to read the file we simply reference the 
elements of pie aeray: ‘To find the sum on S%) of the first 500 elements 
in the file we might use the following statement: 

120 SE = O% : S% = S% + AL(I%) FOR J¥ = O% TO 4992 
When the loop is executed we ef fectiialy read from the file 500 times. To 
write into the file we simply place our virtual array reference on the left 
Side of a replacement operator (equals sign). Thus to write the first 1024 | 
elements of the file with the first 1024 even numbers and then the next 1025 
elements with the first 1025 real numbers Starting at zero and increasing by 
one-half we could use the following program: 


130 A%(1%/2%) = I% FOR 1% = 0% TO 2046% STEP 2% 
140 B(I%) = I%*0.5 FOR 1% = 0% to 1024% 


One thing to remember is that in the program it looks just like we are refer- 
ing torei in-core array, however, we really are reading and writing ona 
disk which is very much slower than reading and writing in core memory. Thus 
we must expect that our program will run much = Slowiy when we use virtual 
arrays. Another special aspect of virtual arrays of strings is the handling 
of tne length of the string. When we store a String in core we keep track of 
its length internally by means of a character count. However, when we place 
the string arrays on the disk we need to be able to uniquely identify each 
one without checking on the length of the others. To accomplish this 
efficiently, all of the strings in any one string array must be the same 
length and that length must be an integral power of two (1,2,4,8,16,32,64, 
128 9-288) To define this length it is placed following an equals sign 
| just after the right parenthesis in the DIM statement. Thus: 

100 DIM #8, A$(100)=8, BS(20,20)=64 
would state that the file open on channel eight consists of two arrays of 


Strings: A$ consists of 101 strings each 8 characters long and BS consists 
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1@G GPEN "NAMES" FOR GUTFUT AS FILE 2- !CREATE THE FILE 
aie DIM #2, Neczeeo=e4 ARRAY RS FILE 
42G INPUT "HOH MANY NAMES") NE HOM MANY NEIMES IN THE FILE 
126 INPUT LINE NSCIZ) FOR 12 = 2% TQ NN-12 

IREAG THE NAMES INTO THe F2 
440 MY = NX-2x “INGH FOR THE BUBBLE SORT 
15% FX = 


of 44) strings each 64 characters long. If you do not specify the Tength 
_of a virtual string array then the system will assume that it is 16 
characters. Virtual string arrays are handled just like in core string 
arrays would be handled except that they are much slower. Examine the 
following example which accepts a list of names from the teleprinter and 
places them on the disk in a virtual string array. Then it sorts the 
‘string array using a fairly inefficient sorting algorithm and it prints 


the sorted list on the line printer. Thus: 


Be (FY IS THE INTERCHANSE FLRS 


160 FOR 1% = GY TO MY 


IF NECIND > N&CIN+42%) THEN TS=NFCTRD 


MECIN) = NECTH+L2D 

NECIN+L2) = TH : 

Fuo= Ae 
FQ NEXT IM : MK & Me -4 GOTO°15G UNLESS FHeON THIS TS Ter f9s 
Sy gete §LSs* eS TUe S Ita See peo Po Nee 
Ge PRINT #3, NSCIZY; FOR 12 = G2 TO Ne-42 ITH SORTES LIST 
Ge CLOSE @,= . END 'ALL DOME 


This is a simple example of sorting a file on the disk when the file is a 
virtual array. Virtua] arpa are very easy to use and when their lack of 
flexibility is not a problem they can be used in place of record 1/0 when 
random access is desired. Virtual arrays, however, have high overhead and 
programs which use them will run slowly. The third method of processing 
files which we will take up next is the most flexible and the most power- 


ful, but it also requires more work on the part of the programmer. 
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5. RECORD PaLENTED INPUT AND OUTPUT 

‘In this section we wil] Study the most powerful and most flexible provi- 

- sions for input and output in BASIC- PLUS. Here we will examine the use of 
the GET, PUT, FIELD, LSET and RSET commands. Also we wil] make use of the 
SiX conversions funtions (CVTFS, CVTSF, CVT%$, CVT$¥ > CHRS, ASCII) and the 
special system variables RECOUNT and COUNT. We will meet some new 
variations on the OPEN Statement. We will add the qualifiers RECORDSIZE, 


CLUSTERSIZE, and MODE. 


6. STRING PROCESSING ~ LET STATEMENTS 
Before we can start to study record 1/0 it is necessary to have a more 
thorough understanding of how the system handles strings internally. When 
we talk about operations on Strings we should keep in mind that when we use 
a string identifier we are metering to two parts of a String. One is the 
string header which contains the String length and a "pointer" which points 
to the other part of the String, the data or characters which make up the 
String. Thus when we execute the statement: 

100 LET A$ = “ABCDEF"" 


we produce the following sort of structure in core: 


; PASIC-PLUS STKINS STORAGE . 


a 
Le 


String Header Area (bn pe 
Area 


Figure 1 
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and when we next execute the statement: 
110 LET BS = "GHI" 


we produce the following in core: 
- + BASIC-PLUS STRING STORAGE 


String Header Area ices Data 
s, Area 


Figure 2 


When an operation occurs which alters a string we necessarily create a new 

one and the old one becomes garbage. Thus the following program statement: 
120 LET A$ = MID(A$, 2, 4) 

causes the string header for the string A$ to point to a new string which 

has a length of 4 and the string which A$ used to point to is now garbage. 


As you see there is no string header pointing to it and thus it cannot be 


referenced. oe 
~- RASIC-PLUS STRIKG STORAGE . 


GARBAGE 


molob .—Ejalmimailojai> 


String Data 


String Keader Area 
a Area 


; . Figure 3 _ 1 9-9 


“AS a program proceeds it generates garbage in the string data 
| area. Gradually this area fills up so that there is no more room for 
strings to be created. When this happens, the Garbage Collector (RSTS=11) 
or the Core Recycler (RSTS/E) is called And the strings are all savaectee 
into the beginning of the string data area. 


Se we execute a statement such as: 


100 LET € =D 
the operation whi-h is performed is to take the contents of the variable D 
and move it to the iariabis named C. This explanation applies when we are 
talking about numbers, either integer or floating point. When we deal with 
strings, however, the operation of the = operator is different since we are 
now concerned with headers as well as string data. When the following three 
Statements are executed, the string header area and string data area will 


look like figure 4: | 
"ABCD" 


100 LET A$ = 
110 LET BS = "UVW" 
120 LET C$ = "ASDF" 


. BASIC-PLUS STRING STORAGE 


@ 


. 


String Header Arca jString Data 
Area 


Figure 4 


nee 
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each string header contains the length and a pointer to the start of 
the corresponding Seeing: Now consider the effect of executing the following 
statement: 
130 LET BS = C$ 
The effect of this is to make the string header for B$ point to the SAKE 


string in core as the string header for C$. Of course, the old string wi.’ch 


B$ pointed to is now garbage and will be collected next time the garbage 


collector is ca‘led. 


Figure 5 shows what the string area looks like after statement 130 is exe- 


cuted, . BASIC-PLUS STRIKG STORAGE 


| 
| 


String Header Area {String Data 


Area 
i 


Figure 5 


Any attempt to modify C$ will cause a new string to be formed with ie new 
value of C$, however, the old value of C$ would not be garbage in this case 
because it is still pointed to by the B$ string header. Thus the statement 
below would cause a new string C$ to be created and the old C$ would still 

be BS as shown in the following code and in figure 6. 


140 LET C$ = MID({A$, 2, 2) 
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.  BASIC-PLUS STRING STOMAGE 


String tieader Area String Cat 


Figure 6 


’ Thus we can see that a change to a string effected by a LET statement will 
not_cause a change to another string which was equated with-that string. 


Also any statement which is true of a LET statement is also true of an 


implied LET. 


7. STRING PROCESSING - LSET AND RSET 
There is another statement which is similar to the LET statement with strings 
except that it always operates on the data in the string data area and 
never on the string header. That is the LSET statement. The general form 
of the LSET statement is: 

100 LSET string name = string formula 
The effect of this statement is to evaluate the string expression or formula 
on the right side of the equals sign and then substitute that string for the 
string in the string data area which is pointed to by the string header for 
the string variable on the left side of the equals Sign. Now consider the 
following: 


100 LET A$ = “ZXCVB" 
110 LSET A$ = "ABCDEFGH" 


After statement 100 the string area looks like figure 7. 
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vee ne eee PASHC-PLUS STRING STORAGE 


o Date 
Area 


String Header Area. 
{ 
Figure 7 


and after executing statement 110 it looks like figure 8. 


Son aeet es tees BASIC@PLUS STRING STORAGE 


wie Data 
Area 


String Header Area 
Figure oom 
You will note that the excess characters were truncated (i.e. thrown away). 
ihe LSET operation can never change the length of the string nor can it move 


the pointer in the string header. If there are insufficient characters 7D 


the string. on the right side of the equals sign then the remaining characte s 
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ive filled ath Bienes: There is another sean ise to LSET (althutil rarery 
used) called RSET. It differs only in that if the string on the right iv: 

a ene: equals Sign is shorter than the one on the left side then the 

characters are put in the right end of the string and the left end filled 

with blanks. Also truncation proceeds from the left. 

We said that the operation of the equivalencing of strings by having the 


~ ry 


string headers iol CAUSE G pi 
string is modified with a LET statement. This is valid for the LET state- 
ment but much the reverse for the LSET (and RSET) operation. The following 
example deanastnaree what happens when two strings are equivalenced and then 


one is modified with an LSET statement. First we execute the following: 


100 LET a = 1123" 
110 LET B$ = “ABCDE" 
120 LET C$ = B$ 


and the string area is as shown in figure 9. 


- - + BASIC-PLUS STRING STORAGE 


String Header Area [String Data 


Area 
| 
Figure 9 
ivy we execute the following statement: 


130 LSET C$ = AS 


-Yinis requests that the contents of AS be copied into C$ and the EXxCess 
over the length of C$ be truncated or that the part of C$ which is not 
filled by A$ be filled with spaces. The string area now is as shown in 


figure 10. 


~ BASEC-PLUS STRING STORAGE Soocmte 


NOTE: The symbod “b" reelaces- A- space. 


te FS. - 


String Data 
Area 


i. 4 
| : | ¢ 
Figure _ 10 


String Header Area 


As you can see the string pointed to by C$ now has the same contents as 
that pointed to by A$. However no changes have been made to any headers 
and now the contents of BS have also been changed. It's important to 
rememoer that LSET and RSET) operate only on the string data area, never 


on string headers. 


- 


Now, suppose that you wanted to have two strings: effectively equal but 
wanted them to be separate and distinct strings rather than simply two 
headers pointing to the same data. This is accomplished by using the LFT 
Statement and concatenating the string with the null string as shown ir. | 
tos following example: 


100 LET AS = "QWERTY" 
110 LET B$ = A$ + "" 


The effect of the operation at line 110 is to force the creation of a - 
ij in the string data area. The string area is shown in figure 71 


i. would be after executing the above two statements. 
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BASIC-PLUS STRING STONE 


| | meh mg toy "| ‘ 
: 


String Header Ares [String Data 
Area 


Figure 1} 


As you can see, the data from the string A$ has been copied into another 
String which is pointed to by the BS string header. The significance of 


this will become more apparent when we discuss moving data out of an I/0 


buffer below. 


NOTE: ‘The String data structure as shown in the figures is 
for pedagogic purposes and not intended to completely re- 
Present the actual structure used by BASIC-PLUS which is 


somewhat more complex. 
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— RECORD_J/O_- GETS AND PUTS 

Now that our side trip into etving data structures is complete we can re- 
turn to the topic of random access input/output. We are about to consider 
the input/output method called "record 1/0", Although this is applicable 
to all input/output devices, we shall limit our consideration to the disk. 
The disk itself is divided into units called sectors. The sector is 
the physical unit which is written or read. In the case of the PDP-11 the 
various disks have sectors of 256 words or 512 characters. This is the 
smallest amount of information which can be read or written and all at- 
tempts by the monitor to read or write the disk must specify an integral 
number of sectors. A sector is also called a block or a physical record. 
Even though we may need only one or a few characters from a sector, the 
nature of the equipment makes it mandatory that at least 512 characters 

be read each time from the disk. In order to accomplish this, a region 

of memory at least 512 characters long is set aside for the disk to read 
into or to write from. This region is called a channel buffer. Theré is 


one buffer for each channel which is currently open. 


As mentioned above, the function of the OPEN statement is to create an 
association between a file or device name and a logical unit or channel. 
Also the OPEN command determines whether or not the requested file is 
present or if specified creates it. Another function of the OPEN state- 
ment is the creation of a buffer. When a channel is OPENed the prograi 
expands by 512 bytes (1/4K of core) and that area is set aside for use as 
a buffer for the channel. (Remember that we are talking only about disks. 


The size of the buffer for other devices varies according to the charac- 
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teristics of the device.) There are procedures whereby the buffer can be 
made larger and fray will be described later. Once a channel peered 
then all data transfers take place between the device and the buffer and 
then between the buffer and the appropriate places in the ieee data area. 
Now consider the following example: 

100 OPEN "FILEA® FOR INPUT AS 9% 

110 INPUT #9%, AS, B$ 

120 INPUT #9%, C$ 
After statement 100 was executed, the association of name to channel would 
be established as would the buffer for channel 9. When statement 110 was 
executed the monitor would discover that the buffer was empty so it 
would read the first sector of the file into the buffer. Then it would 
find the first two strings in the buffer and copy them into the string area 
and set up the appropriate headers. At statement 120 there would still be 
information in the buffer so the monitor would set up a string header for 
C$ and would copy the next string in the buffer into the string data area. 
If during this time, the data in the buffer was exhausted then the monitor 
would refill the buffer hy reading in the next sector. Thus with serial 
I/O the buffer management is entirely transparent. to the programmer. Sim- 
Tiarly, in the case of virtual arrays the data is read from a disk into the 
buffer and then accessed by the program but the user needn't concern him 


self with buffer management functions as the monitor does this for him. 


In the case of record I/0 the programmer is given control over the buffer 
and is responsible for its use. The system loads the buffer from the disk 
and writes the buffer onto the disk in response to specific instructions 
in the program. The transferring of data to and from the buffer and the 
use of data within the program is all undertaken by the user program. 


This provides for the maximun Flexibility and gives the BASIC-PLUS pro- 
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granmer alt tices in controlling devices and input/output functions that 

| the system programmer normally ae available in other systems. 
The reading of data from the disk into the buffer is accomplished by the GET 
Statement. We specify the channel number and the record (i.e. sector) in 
the file that we want read as follows: 

100 GET #3, RECORD 7 
This statement would read into the buffer EhecconteHes of the seventh sector. 
or physical reco.d in-the file. As mentioned earlier a file on a disk con- 
sists of one or more sectors. Although their actual location is a function 
of the monitor's file proceseon:. each block ae a logical or relative block 
number. Thus the first block of the file is record 1, the ene is record 2; 
and so on. Using record 1/0 we can access any block or sector of the file 
simply by specifying the relative record number in the GET statement. Of 
course before executing a GET statement it is necessary to associate a file 
name with the channe) number through the use of an OPEN statement. This is 
the feature that gives rise to the jeceHipeion of record I/0 files as 
random-access. We can access any (physical) record of the file without 
accessing those which preceed it in order to find that record. The method 
of searching through a file in order to find a specified record is called 
serial-access. If you wanted a erogratl which read into the buffer a user 
specified record then the following program segment would accomplish that: 

100 OPEN "FILE.DAT" FOR INPUT AS FILE 1% 

110 INPUT "WHICH RECORD DO YOU WANT", J% 

120 GET #1%, RECORD J% 
In actual use the RECORD qualifier is optional. If we specify no record 
number the system GET's the next record which is the one next after the 


last access on that channel. Thus to read a file serially only a series of 
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CET's is necessary not specifing a record number. 


To write a sector from the data in the buffer we use the PUT Statement. The 
general format of the PUT is just like the GET except that the direction of 

transfer this time is from the buffer to the disk. The following statement 

writes the current contents of the buffer into relative record 23 of the 


file which is open on channel twelve: 


In the same way ¢s the GET the RECORD qualifier is optional and its omission 
produces a serial write srthe file. Thus to create and write a 35 block 
file (without attention to putting data into the buffer) the following pro- 
gram might be used: 


100 OPEN "FILEB.DAT" FOR OUTPUT AS FILE 11% 
110 FOR I% = 1 to 35% twe want a thirty five block file 


120 GOSUB 200 'the subroutine at 200 puts the data 
linto the buffer. 

130 PUT #112 | write the buffer onto the disk 

140 NEXT I% 'do it 35 times 

150 CLOSE #11% : STOP 'all done, close file 


200 REM A subroutine to get data and move it into the buffer 


- 


999 END | 
At this point the reader may be inclined to observe that although he can read 
and write between a channel's buffer and.the. disk he doesn't see any way to 
access the data in the buffer. That is the function of the next statement 


which will be described, the FIELD statement. 


9. RECORD 1/0 - THE FIELD STATEMENT 

It is the function of the FIELD statement to make accessible the data ina 
channel's buffer. This is accomplished through the use of the string header 
mechanisin described earlier. The FIELD statement establishes String headers 


in the string header area which point not to the string data area but to the 
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channel buffer. Thus the FIELD statement allows us to define the record or 


segments of it (called fields) as string variables and then we can manipulate 


them using the string operators available in the BASIC-PLUS language. To set 
up this association of the string header to the channel buffer the FIELD 
Statement has to have several pieces of information. It needs the channel 
number ss the channel (in order to know which buffer is being referred to), 
it needs the length of the string for the string header, and it needs the name 
of the string. Thus a simple case of fie: FIELD Statement might establish 
that the first fifteen characters in each sector of the file open on channel 
4% is to be called X$ and would be written as: 

100 FIELD #4%, 15% AS x$ 
The FIELD statement can be used to set up more than one header in one state- 
ment. Suppose that in addition to X$ as described above, we want the variable 
names Y$ to correspond to the next seven characters in the physical record | 
after the fifteen characters in X$. The following statement would accomplish 
that: | 

100 FIELD #42, Vea AS X$, 7% AS YS 
In general the FIELD statement can be continued as long as reasonable subject 
to the general limitation of BASIC-PLUS that no numbered line in a source 
program can be more than 255 characters long. Once the channel's buffer has 
_ been described in terms of string headers then the data within the buffer can 
be manipulated with the LET, LSET and RSET statements described earlier. Now 


we shall look at the mechanism by which this is accomplished. 


If the following program seament were executed then the String header and 
Storage areas would be as shown in figure 12. 


100 OPEN "FILE" FOR INPUT AS FILE 4% 
110 FIELD #4%, 10% AS X$, 32 AS YS, 4% AS Z$ 
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PASIC-PLUS STRING STORAGE 


, maamemninntmanneerned 


String Header Area [String Data Channel ‘4 pe 


a Channel 
Area Buffer buries = 


Figure 12_ 
We now have. three string pointers pointing into the channel four buffer. If 
we wanted to print on the terminal the contents of each record (block) the 
— following statements would accomplish it: 
120 FOR 1% = 1% TO NZ 
GET #4% 
PRINT X$, YS, ZS ¢ 
NEXT 1% 
Of course a FIELD statement must not be executed before its channel is OPEN- 
ed as there would not be a buffer for the string headers to point to. Now 
let us return to our example of the list of names and addresses. First we 
will accept a list of names and addresses from the terminal and then we wil] 
print them on the line printer. In order te do this with record I/0 we must 
first set up : "Record Definition Table" which defines the fields and their 


lengths. Table 1 is an example of such a record definition table for this 


example. 
RECORD DEFINITION TABLE 

FIELD VARTABLE LENGTH DESCRIPTION 

NUMBER NAME 
1 NS 23 Name, last name first 
2 S$ 26 Street number and street 
3 C$ | 19 City and State 
4 Z$ 5 Zip Code 


Table 1. Record Definition Table. 
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Now we can write the program to accept the data. 


iT’ FOR OUTPUT FS FILE ta | 'ORPEN THE FILE 


ifs OPEN "MNAHES. BF 
fia INPut “HOW MANY TTEMS">s be 'HUIMEER OF NAMES &f 
12: FIELD #1442, G@EX AS NS, ZER AS SH, 192 AS CH, Se HS SF 
Laka LSET RE = NUMECKSD : 
PUT #126, RECORD 1d 'OTORE THE NUMEER OF ITEMS 


d4@ FOR Ik = de 


PRINT 
Petey 


ay te th 


fou on 


Peo Ot 


152 FUT #1e, 


hit 


aa) 
2 


b+ p>} 
by ate 44 


{J Ot 


hEHT Ls 


Lea CLOSE. 2 


TO Ne : 
SOL: THE Hae” SDPO oo 
OW THE STRESS NO TeUithe 
iMFUT THE CITY AND STATE 
*WEUNPUT, THE 2b -COoGE™s 22¢ 


I 
2) 3 a ee 


ul 
, : TNE 


BINS S44 


T 
UT LIKE Cit 


2d MOVE THE CATA FROM THE STRING AREA INTO 
' THE CHERNEL BUFFER. 


RECOSh Ik + LH 


[WRITE THE BUPPER 10 Ther tLe 


SE ML TRLEL DONE 


Now we have established our file of names and addresses. You will note that 


in the first record we stored the number of entries and used the other re- 


cords to store the actual data. This 1s not actually necessary as BASIC- 


PLUS provides a method for determining the physical end of the file but it 


is frequently a useful technique, particularly when random access files are 


being used. 


Several system utilities such as the SORT package expect files 


to be set up this way. Next we want to write a program which will print on 


the line printer al] the names and addresses for which the zip code begins 


with a "9". 


The following program will accomplish that. 
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Leo UPPER "NAMES OAT" FOR IMFUT 8 FILE 2 
Oa ee ad a = oS co Ge Sa 
FIELD #24, 232 AS NE, SEX AS SH, 10 FS Ot, SH Ae Be 
; POPEM FILES Ant SET UP THE SUFFER 
dio GET #24, RECORD 41% : 
LET Ne = VAL ONS 
; . ‘ROW WARY ITEMS ABE IN THE BLUEEER 
Lee Foe 4% = 144 To ne 


GET #2k%, RECORD Ik+i2 
torre) Tr terre ecn meme. eae a ews Sas 
hee. ae _ a a Poe OUreok rir PRE FILE 
A236 PRINT #34, N$iS$; 02127 IF LEFTC?$, £4) = "en 


RENT I% 
5 cetera ton? 'RPRINT THE GATE 
Lai CLOSE 2%, 34 DENL TALL DONE 


For a practical- problem some editing of the input data would have been re- 
quired. Now eiiniee we wanted to include in the line printer listing the 
record number of each name. We might suppose that the record number might 
also be a customer number or some other identification. Then we might change 
line 130 to be as follows: | 


130 PRINT #3%, I%4+1%, NS; SS; CS; Z$ IF LEFT(ZS,1%)= "9" 
NEXT I% 


Then we ane want to write a program which printed out the name and add- 
ress of a customer on the terminal if we were given as input the customer 
number. This type of inquiry-response program would make use of the ran- 
dom access nature of record I/O files. Look at the following progran 


which does provide that type of information. 
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wh SMO ne At Aa oe REE ae ae TPIT OR eerie et Gee HR LES aie 


PEt tae 3 ae AE See Te. a ote 
NOPE PEE Ueiie Ger THe. THe Bue rer 
426 GES #48, FRECHE Ze : 
LET Wy = WALONS 8 VHUONS Ee Pr RE Toe Pes 
Peek TREUER WWRIGH BESTE Ee") oe : 
TF C# > MA TRER PRERT “Ro SUCH CUSTONER NUMBERS, CH 
GaTo 126 | 
'GET RECORD NUMBER AG RBAMIGE CHEE 

#4H, RECORD CH#+te : 
PRINT Ne. Sts C¥; SF 
IRFUT “AMS MORE: GSE: 
GoTa 428 UNLESS Ag eee ae 

; CLOSE 42 > ENE 


to 
tas 
‘7 
we) 
aa 
“4 


Hoy sr 


In this program the file is opened and the Field statement describes re 
channel buffer in terms of strings. Then the record (i.e. customer) number 
is obtained from the user and that record is obtained from the file. The 
information in the buffer is then printed out on the terminal direetiy from 
the buffer. The final Foe: nee provide for stopping the program when the 
user 1S finished. Note also that there is a check for a customer number 


which is too large to be in the file. 


10. LOGICAL AND PHYSICAL RECORDS 
At this point we must learn the meaning of certain terms. These are logical 
record, physical record, blocked and unblocked records and spanned records. 


A record is usually thought of as an entity which is retrieved from a file 


“asa unit. A logical record contains all the information about something. 
A customer apa might contain the customer naine and address, his current 
balance: the maximum amount of credit which he is allowed, the salesman 
assigned to his account, and any other information which pertains to that 
customer. An inventory item record might contain the description of the 
item, the number of such items on hand, their price, whether a resupply of 
the items has been ordered, their cost, and such other information as would | 
pertain to that item. The individual items which make un a 10¢ical record 
are usually called fields (thus the FIELD statement) and where a field is 
made of several more fundamental items of information they are called sub- 
fields. A physical record, on the other hand is usually defined by the 
nature of the recording mechanism. In the case of a disk on the BASTC- PLUS 
System a physical record constitutes one or more blocks each consisting of | 
256 words or 512 characters. Since we describe a buffer and thus a phy- 
Sical block in terms of characters (with the FIELD statement) we generally 
think in terms of a physical record of 512 characters. A physical record 
is the smallest entity which is retrieved from a disk file. In our exaniple 
above we simply equated a phys@ial record (containing 512 characters) with 
a logical record (73 characters) and wasted the remaining characters. The 
greatest efficiency in terms of fast response usually results when we can 
equate physical records with logical records but in most applications it is 
not practical to waste large’ amounts of stfigage to accomplish this. As a 
result we generally put several logical records into each physical record. 


This process is called blocki ing records. There are two methods of blocking 


records. In the most common as many logical records as will fit are block- 
ed into one physical record and the remaining characters are wasted. This 


represents a compromise between the inefficiency of wasting a lot of space 
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by not blocking’ records and the amount of time needed to handle logical re- 
cords which are spread across more than one physical record. When we do 
allow-a logical record to cross (or span) the boundry between two physical 
records we refer to it as a Spanned record. This is the most efficient 
approach in terms of the conservation of disk storage space but consider- 
ably more processing is required to handle such records so that normally 

in the course of our file design we try to arrange that the logical records 
Will f111 or almost fill a physical record without Spanning physical re- 
cords. Figure 12 shows examples of "unblocked", sPHOCk es and “blocked 
and spanned" records. Later we will cover some aspects of file design 

and try to show how a File system might be designed to minimize the wast- 


age of storage without imposing the inefficiency of Processing spanned 


records. 


PHYSICAL SECTORS IN THE FILE 
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. Span physical records. 


ee storage is wasted. 


figure 13 
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. V1. HANDLING NUMBERS - CONVERSION FUNCTIONS 

At this point you may ave ooeenuee eat no eecnanien has been described 
whieh allows a number to be placed ina buffer using record I/0 other than 
converting it into a decimal string with the NUMS function. In terns of 
elemental operations there is, in fact, no provision for placing nunieric 
items in the channel buffer. The actual hardware always works in terms 
of blocks of characters so the software is designed to take advantage of 
ine hardware. None the less one generally wants to 
store numbers .s well as Strings of data in a file and functions have been 
provided for this. These functions take umber in their internal rep- 
resentation (i.e. binary) and translate them into strings so that they 
can be placed into the buffer. Each sich fnekiea has a complementary one: 
that takes a string in the buffer and places it back into the numeric data 


area of the program. In BASIC-PLUS two ¢ pe of numbers are available, 
¥] 
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“integers and floating point. (In some systems decimal data type replaces the 


né integers occupy two bytes in core and have a range of 


wad 
3 
ct 
ne 
= 


+32767. They also occupy two character positions in the buffer. Floating 
point numbers are four bytes long and occupy four character positions in the 
buffer. Many systems replace the floating point option With a double pre- 
cision format which occupies eight bytes in memory and requires eight char- 
acter positions in the buffer. Thus if we have a two byte integer K% in 
memory and we want to put it into a file we define a 2 character string in 
the channel buffer using the FIELD statement si then we move the binary 
value of K% into the buffer by converting Ky to a string and LSETing the 
_ String into the channel buffer. If we wanted K% to be placed in the first two 
characters of the channel -#3 buffer we would execute the following field 
statement: | 

100 FIELD #3%, 2% AS K% 
and then we would place the value into the buffer by converting it to the 
string K$. The function which converts from integer to string is called CVTYS 
and the code put Kis into the buffer would be: 

110 LSET K$ = CVT%$(K%) 
To retrieve an integer value from a channel buffer we first would use a 
FIELD statement to describe the two character positions which held that value 
3S a string and would then use the function CVT$S% (convert from String to 
integer) to make the conversion as follows: 

150 LET K% = CVTS2(K$) 
+. This converts the string to an integer and moves the data into the area used 
to store the values of numeric variables. Remember that we use the LSET 
Statement to move the characters in a string into a buffer but a LET state- 
acne to move data into a core location (except where we deal with string 


headers). 
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We can handle floating point nimebers in the same Way except that we need to 
use four or stunt character positions in the buffer and we use the function 
CVIF$ to convert from floating point to string and the function CVTSF to 
convert from a string in the buffer to a floating point number, Thus if we 
wanted to store two integers U% and C1% and two Single precision floating 
point numbers X and Y in the channel 8 buffer we could use the following 
statement: 


200 FIELD #8%, 2% AS US, 2% AS C1$, 44 AS X$, 4% ns Y$ 
210 LSET u$ = CVTs $(U%) : 

LSET C1$ = CVTe$(C1¥) 

LSET X$ = CVTFS(x) : 

LSET Y$ = CVTF$(Y) 


Similarly we could retrieve the same data by converting it from string to the 
appropriate numeric form as follows:, 


200 FIELD #8%, 2% AS US, a AS CIS, 4% AS x$, 4% AS Y$ 
210 LET U% = CVTS%(US) 

LET C1% = CVT$%(C1S) 

LET X = CVT$F(XS) 

LET Y = CVTFS(YS) 


One more data type is provided for use in files which does not exactly corres- 
pond with any data type found in the BASIC-PLUS language. That is the byte 
data type. This is a numeric type used where it is desired to Store a nuniber 
whose value is in the range of zero to 255 in one character. This is very 
useful for type codes and similar data items where the range of values is 
limited. This type of data is transferred to and from the buffer in the same 
way as inteyers except that the strings are only one character lang and the 


function CHR$ is used to convert froma va tue to a one character string and 


f 


the function ASCII is used to convert from a one character String to a value. 


Thus to store the small integer X% in the buffer we might write: 


100 FIELD #8%, 1% AS X$,......... 
110 LSET X$ = CHRS(X%) 
Retrieving the value would be done similarly to retrieving integers except we 


would substitute the ASCII function for CVT$%. 


12. MORE ON STRINGS IN BUFFERS 

Since the FIELD statement is an executable statement the description of chan- 
nel buffer can be changed.at any time. In some cases it is convenient to have 
records of several different types intermingled in a file. In this case one 
of the characters in each record is a record type code. We GET the record . 
into the buffer and then examine the type code using a previous field state- 
ment. Based on the value of the type code we can then execute one of several 
FIELD statements and process the record accordingly. Suppose we had a file 
TRANS .ACT which contained transactions pertaining to a supply system. If the 
transaction code (in character position one) was a one then the transaction 
was an issue and the quantity issued'was in character positions two and 
three. If the item had been received and was to be put into the inventory . 
then the transaction code would be a two and the number received would be in 


character positions three and four. In any case the stuck number would be in 
character positions ten and eleven. Suppose the other positions were used* 


for information needed only in other programs. If the type code was three 
then that would signal that this was the last record in the file and no other 
fields would be used. The following Record Definition Table defines the 


fields of the record. 
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nd ‘Type Variable Length Description 
Numbar “ Name 


Type 1 Record | 

} . Record type code (=1) 
Quantity TSssued 
Unused 
Stock number 


> OO AQ 
hm Oe OO 
jeans 
47> 
MSI A 


Type 2 Record 

| Record type code (=2) 
Unused 

Quantity received: 
Unused 


OTF WO ND 
OM Oo 
&> 
Baa 
POO RO es ow 


Type 3 Record 
1 B T$ 1 Record type code (=3) 


Table 2, Record Definition Table 

The field types are B for byte, I for integer, F for floating point, S for 

String and D for dummy. Since the FIELD Stationers always counts characters 

Positions from the left of the channel buffer we must space over to the fields 
_ We want by using a dummy Field to describe the unused character Positions. Now 

we want to write a Program which wil] go chou the transaction file and com- 

pute the net Changes which occurred in the inventory. To Make the Program 

Simple we wil] assume that the stock numbers are all in the range of one to 


twenty. The following Program should make the requested calculation. 
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Pedso = 0 FOR gusq Po soy SE ORTOL Gourespay 
STRE MET IMMER Tomy cs ee. Pie 
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Loi r Hd | PGET OR REGARD Seperate Ce eee 
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PFU PROGESS fete RD Cer 
Sata ree: WES PP eee CAO ISSve Type RETR L 
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ee ONT Se pa, oe PCOVTS CSI ix CVY Sie ite 
beTo 136 
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atk ‘HERE We PROCESS EAH ROECETET TYRE RE Cer 


tia’ 
SAE IU B18, Be ne ne, ou WS GF, 62 9S bs, on ne og 
20 ICCVTS20S$9) TCCWTSER CSE) 4 CTs tenes | 
6O1G t3u CUNEE (He TPP PPRPeTE Marie J ae 
At PRERE WE PROCESS THE en ap THE FILE 


PRIWT JE, Leg wt FOR G2 = ay Pa See 
~ T 
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In this program we first OPEN the file on ien we execute 
a FIELD statement to set up the string T$ as a one byte field. After Vine 


110 has been executed the string area is described in figure 14. 


String Header ve =~ pia Chane | Channel __ 
. ; Buffer 
Figure 14 


Then we zero out the | seray which we will use to accumulate the changes 
to the inventory. At Vine 130 we GET one record and at line 140 transfer 
to the appropriate routine to process that type transaction. I¢ the first 
record contained a type one record we would transfer to line 200 and after 
the field statement was executed the string area would be as shown in 


figure 15. . 
| - = +-=) BASIC-PLUS STRING STORAGE sents 


x Data Channed 1 I Channe} ae 


leader Area 
String Heade Area Buffer buffer 


Figure VW 


(7-33 


Note that the dummy variable D$ appears twice in the FIELD eeecuenes This 
is alright since we don't really care about D$, we just want to space over 
_ the unused character positions in the buffer. When a variable is referenc- 
ed more than once in a FIELD statement only the last use counts. Now at line 
220 we update the appropriate entry in the I aeray using the CV1$% function | 
to convert the values in the file to integer values. Since this is an issue 
we SU ime a type one recor 
appears this process will be repeated. If the GET statement at line 130 
gets a type two record we go to line 300 to process it. We execute the 
FIELD statement at line 310 and then the string area appears a8 Shane in 


figure 16. 


pASIC- PLUS STRING STORAGE 


at 
7 
| 


| 
String Data. [Channel Vo | cianney 


Area Buffer cult 


String Header Area 
Figure 16 


The FIELD statement has caused the positions of the strings (except for T$ 
which was not referenced in the FIELD statement) to change. At line 320 the 

, summary data in I is updated, this time adding since this is a receipt. 

When a type three record is found we transfer to 400 where we close the 


channel and print out the summary data from I. Thus we can see that the 
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String definitions made with a TIELD- statement are gynamic. They are estab- 
lished when a FIELD statement 1s executed and remain until another FIELD 
Statement changes them or when a LET statement affects them. Let's look 
at another example. Consider the following FIELD statement: 

100 FIELD #11%, 2% AS A$, 6% AS BS, 4% AS C$, 1% AS DS 


At this point the string area is set up as shown in figure 17. Now we want 


- -BASIC-PLUS SIRING SIGRAGE - 
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Buffer 


Figure Me 


to put the character string "WASHR" into BS but erroneously use the state- 


ment: 

110 LET B$ = "WASHR" 
The LET statement causes a new string to be set up in the string data area 
and not in the channel buffer. Thus we now have the situation shown in 


figure 18. The B$ string header points into the string data area and the 
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, | 
Channel “1 Channe) 


String Header Area foe Data 
; ; Area Bure. Buffer 


Figure 18 


only way to get it to point back into the channel buffer is to execute ano- 

ther FIELD statement. The statement we sion have used to put the string 

"WASHR" into the channel buffer was a LSET statement. If line 110 had been: 
110 LSET BS = "WASHR" 


The string area would have been as shown in figure 19. This would have 
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Figure 19 


left the BS pointer pointing into the channel puffer. 
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The Aoabiiaeyte have more than one ee header point to the sama string 
is often used where a-data item consists of sub-items. For example a six 
character field could contain the date in ddimyy format. Sometimes we want 
to reference it as a Single field and move it intact from one place to ano- 
ther. Othertimes we need to Took at the specific date and operate on each 


sub-field. If the date was stored in the first six characters of the file 


open on channel 1 and it was to be moved to character positions four 
through nine of the channel buffer for file two and then the day tested to 
see if it was before the fifteenth of the month we could use the following 
program segment. | < 
100 FIELD #1%, 6% AS DIS: | 
FIELD #1%, 2% AS T$, 2% AS MS, 2% AS Y$ : 
FIELD #2%, 3% AS DS, 6% AS D2$ 
.110 GET #1% 


LSET D2$ = DI$ 
IF VAL(T$) <15 THEN GOTO .... 


After the three field statements in line 100 were executed the string area 
would appear as shown in figure 20. Note that DI$ and T$ point to the same 
place but their length are different. Also M$ and Y$ point into the string 


which is D1$ and are in fact substrings - (or sub-fields) of DI$. 
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Another commnon.difficulty is the aoarucien of strings in a channel buffer | 
and strings in the string data area. Look at the Record Definition Table 
below. Here we have an inventory record where the data is the quantity on 
hand, the item description and the stock number. The stock number'consists 
of two parts, a two character class code and a three character item code. . 
Note the use of the Sub--item description. 


RECORD DEFINITION TABLE 


Field Type Variable Length Description 
Number Name Item Cumulative 
7 F Q$ 4 0 Quantity on hand 
2. S S$ 5 4 Stock number 
2.1 #S, cs 2 4 Class Code 
2.2 S I$ 3 6 Item Number 
3 S DS 20 9 Description of item 


Table 3. Record Definition Table .- 


The cumulative length column simply shows the number of character positions 
before each field. Now we want to take this record definition and process 
a file which is in order by stock number. Basically we are goint to print 
out a list of items and quantities on hand. We will also maintain two 
Summary totals one for each class and one for the entire inventory. Each 
time the class changes we will print out the total quantity on hand for 
that class and then zero the sumnary total for the class. Such a program 


might be written as follows: 
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ede 


ar 6 OSS as + os 
“bite p ti, 4 FS Gt, 2 AR OF ROARS 13 
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PRINT "STOCK RECORD LisTIng", OGATEECED 
PéERG THE SUNMNREY COUNTERS BMD PRUINT HEADING 


HET #4 : 
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GOTO 236 
PeIhT "THE TOTAL FOR CLASS “; GF "IS"; S4 
PRINT 


PRINT “THE TOTAL FOR ALL CLASSES If "3 Se Pre dieT re 


CLOSE 1 : END 
The program is fairly straightforward. First we open the file and des- 
cribe the channel buffer in line 110. We zero the variaotas wich we 
will use to accumulate the necessary summary totals and thea brint a 
heading with the date. We read a record and check for the end or tne 
file. If not we convert the quantity on hand to a floating potat rum. 
ber (line 140) and then check to see if we have changed tna class of 
item from the previous item. If we just read an item from a new class 
then at line 159 we print out the summary totel from the crevious 
class and then zero the total to use it with the next class. We srint 
the item record at line 160 and update the totats. At line 170 wo try 
to save the class code of this record for use in making a caorparison in 
the next cycle ana then we repeat the operation. At line 220 we prins 
our last class total and the grand total and end the program. Unatoriu~ 
nately this program wil] not work as it contains a very common eran. 
First let's look at the string storage area after the execution of 
ciztement 110. Thiss4s shown in Figure 21. Whe the ste homens . cine 


179 is executed the string area has a new header, that fc: OS. inis is 
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shown in figure 22. Unfortunately the operation simply set up a new 
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String header but it did not move any data (that is how a string eauate 
is suppssed to work). However, the comparison in line 150 will never 
succeed since CS and 0S will always be the same since they both point 
to the same data. When we change the contents of C$ by reading a new 
record into the channel buffer we also change 0S since 0$ end CS are 
the same string. We can avoid this by the use of either of two mech- 
anisms. If we simply replace statement 170 by the following: 


170 LEY 0s = C$ foun 
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then the operation requested will force a new string to be created in the 
string data area. After this statement is executed the string area will 
be as shown in figure 23. Now we have the old value 0$ stored in tie 
String data area where it will not be affected by GETting the next. record 


into the channel buffer. 
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Figure 23 83 
Another more efficient way of accomplishing the same thing would be to est. 


ablish the string 0$ with the correct length in the string data erea at 
some point in the program before it was first referenced. Then we could 
use a LSET to move the data from the buffer into the String data area. 
Suppose we added a statement 105 as follows: 

| 105 LET O$ = SPACE$(2) 
Then we could replace line 170 with the following: 


170: LSET 0$-= CS 


v} 


ri 


This would have the desired effect of moving the contents of C$ inte 3 


4 


(remember that LSET can never move a pointer, only string dataj. Since 
LSET cannot alter the length of a string it is important to establish the 
correct length for the destination string before using LSET jn this way 
The problem described above, that of mistakeniv moving a string potate: 
to point into the channel buffer instead of moving date fron che buffes 
into the string data area is perhaps one of the most common probiems ci- 


countered in using record 1/0. 4) 
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13 BLOCKING RECORDS 

Now that we have described the use of record I/O in file processing we can 
Took at sone techniques used to increase efficiency. Earlier we ‘et iodiie: 
ed the concept of blocking records. At this point we want to examine the 


procedures used to block and deblock records. There are four operations we 
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want ty perforn: writing blocked waco serially, reading blocked records 
serially, writing blocked Feces randomly and reading blocked records ran- 

domly. We will consider here only records which do not span physical sec- 
tors. The fundamental technique used in these cases is to process multiple 
logical records in one physical block by dynamically executing a FIELE 
Statement. Then the particular record we want to operate on is pointed to 
by the string headers for the fields of the logical record. That is, if 
our logical record is 32 characters long and consists of two fields, A% 
which is 24 characters long and B$ which is 8 characters long, we wowld use 
a FIELD statement such as the following to look at the first logical record 
in each block: 

100 FIELD #1%, 24% AS AS, 8% AS B$ . 
The effect of this is to describe as A$ and BS the first 32 characters of. 
fnaianysion record. To examine the second logical record in the bieck we 
would use the following FIELD statement. 

100 FIELD #1%, 32% AS DS, 245 AS AS, 8% AS BS 
Thus the first logical record is spaced over by the "“dumny" field D3 and 
the second logical record is described by AS and BS. Since each physical 
record consists of 512 characters, each will contain axsetiy 16 logical 
records. To find the Nth logical record in a block we could set the var- 
iable N to a value between O and 15 and use the following FIELD statement. 
to set up the headers for AS and BS to point to the particular logicai re- 
cord we are interested in: 

100 FIELD #1, N * 32 AS DS, 24% AS A$, 8% AS BS 
When this is executed it will space over the previous logical records and 
set up A$ and BS as desired. To see how this would work let's sce what 
vould happen if we wanted the first logical record in the block. In this 


case we would set the value of N to be 0. Thus N * 32 would aiso be zara 
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(since anything multiplied by zero is zero). Thus the effect would be bi 
execute a FIELD statement like the following: 
FIELD #1, 0 AS D$, 24% AS AS, 8% AS BS 

DS would point to the beginning of the buffer as would AS and BS would point 
to the 25th character in the buffer. To operate on the second logical re- 
cord in the buffer we would set N to be 1 and execute the FIELD statement 
described above. This time the formula N * 32 would evaluate as 32 and 
the effect of the FIELD Statement would be to use D$ to space over the first: 
logical record and set up A$ and BS to point to the second logical record. 
To operate on the tenth logical record we would set N to be nine and the for- 
mula 9 * 32 would evaluate as 288. The effect of this would be to execute 
the following: | 

_ FIELD #1, 288 AS D$, 24% AS AS, 8% AS BS 
The first nine logical records (288 characters in all) would be spaced over 


by D$ and AS and BS would point to the tenth logical record. 


Now let's look at how we can make use of this by working with a practical 
example. We will have a file called "LOCATE. INV" which contains the loc- 
ation of items in a warehouse. fach logical record will consist of sixty- 
four characters as described in the following record definition table. 


RECORD DEFINITION TABLE 


Field Type Variable Length Description 

Number Nae Itein Cumulative 

1.0 S L$ 5 0 Location of_item by 

floor, bin and rack 

1.1 B FS ] 0 Floor of building 
1.2 I RS 2 1 Bin number for item 
1.3 I RS 2 3 Rack number for iten 
2.0 S NS 59 5 Nomenclature of iten 
Table 4. Record Definition Table for Location File 
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Thus there would be exactly eight logical records in each physical record 


and in the buffer at any time. 


First we must create the file and we do 


this by serially writing the file using the techniques described above. 


The following program will create the file. 


of the item in the file is its part number. 


placing a count of the number of logical records in the first logic 


cord of the file. 
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In this program we first set up the file in line 100 and obtained the total 
numer of logical records to be entered. Teh we put that into the file by 
~ LSETing it into the first record. Kext we set up some useful constants. U% 
contains the maximum number of blocks we would need for the entire file. _ 
(Note that since adding a block to file takes a great deal of ie and add- 
ing many blocks to a file takes very little more time than adding one block 
we could make the program run more efficiently by inserting the statement 
PUT #1%, RECORD U% 
in line 110). We also set up F% to contain a one. This is used as the 
first value for the FOR loop which controls the field statement and thus the 
number of logical records in each buffer. This is done because we will put 
one fewer logical record. in block one since it contains the count of the re- 
cords as its first logical record. Every time the FOR J% loop is executed 
except the first it will start at zero since we set F% to 0% at the end of 
each block. The data is obtained for each logical record and put into the 
buffer by the FIELD statement at line 140 and the LSETs which follow. We 
update the record count and check for the last record. If we have just en- 
tered it we gote line 200 otherwise Hie continue to accept records until the 
buffer is full at which point we goto line 160. At line 160 we write the 
buffer to the disk and reset F%. At line 200 we write out the last buffer- 
load, close the file and end the program. Another point to observe is that 
in the Statement just above line 150 we remove the last two characters of 
the input string since the INPUT LINE operation includes the carriage re- 


turn and line feed characters and we don't want them in the file. 


Although the method used above is entirely adequate there is another way of 
determining the record and position of the desired logical record which is 


Frequently more useful and is essential when dealing with rendom access to 
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blocked records. This procedure uses the logical record number to obtain 
tiie physical block number and the position of the logical record within 
the physical record. Given the logical record number we divide it by thie 
number of logical records in one physical record. The quotient is one less 
than the physical record number in which the logical record is to be found. 
We then obtain the remainder of the division. This is the number of the 
logical record within the physical record less one. In tieeeaee of the 
remainder we leave it less one since it is used in that way to muitiply by 
the length of the rogicel record to determine the length of the dummy 
field used to space over to the logical record in the buffer. Considering 
Our current example we have eight logical records in each physical record, 
If we want to access record N% we first divide NZ by 8% and add one. 

LET R% = N%/8% + 12 | 
We now have the actual physical record number we want in R%. We obtain the 
remainder from the division by ma eolvive the quotient by the divisor and 
subtracting it from the dividend. The following statement accomplishes 
that: 

LET J% = N& - (R&-1%) * 8% 
Now suppose we want to look at the location record for part number ten. 
First we divide ten by eight (Since we are using integer arithmetic there 
1s no fraction when a division is perforned. That is essential to the 
operation of this procedure.) Thus 10 / 8 gives us a quotient of one. To 
this we add one to obtain a physical record number of two. This makes 
sense as the first eight logical records are in physical block one and the 
next eight are in block two. Wow we obtain the remainder. First we sub- 
tract one from the block number. 2 - ] gives us 1. Then multiply by 
eight. 1 * 8 gives an eight. Then subtract this from the original logical 


record number. 10 - 8 gives us a two. Now we know that we must look at 
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Pliysical record number two and multiply the length of the logical record by 
tio to obtain ‘the length of the dum field. Thus we would use a FIELD 
statement as follows for this example: 

FIELD #1%, 2% * 64% AS DS, 1% AS FS 
Note that the calculation ne cunee that the first logical record number is 
number zero. If the numbering system used in the program starts at one 
then it will be necessary to subtract one from the logical record number 
before doing the calcuialion. This is frequently unnecessary since the 
technique of putting the number of logical records into the first for 


zeroth if, you prefer) logical record is very common. 


Now we can write a simple program to list all of the location records on 


the lineprinter. We will use the remainder technique to find each logi- 


cal record. 
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This program is very straightforward. First the files are opened and then 
the number of records is obtained. The output device is opened and a head- 
er printed on it. Then in the main loop starting at line 120 the record 
number is calculated and the appropriate block read into the buffer if 
necessary. The FIELD statement sets up the string headers and the data is 
printed on the printer. At line 140 the files are closed and the program 
ends. 

The only other important point to note is that the variable RO%® is used to 
. indicate which block is currently in the buffer so that no more reads from 
the disk are performed than necessary. - 

In the example programs in this section you will notice that very few line 
numbers are used. This is a special feature of BASIC-PLUS and enables us _ 
to make our programs more efficient. Aso combining the use of only the 
essential line numbers with indenting the program helps make it more read- 
able and the logic of the program more apparent. | 

To randomly read a blocked record from a file is similar to the last ex- 
ample. The desired record number is obtained and then the remainder method 
“4s used to determine the block and record within the block to read. The 
block is read with a GET statement and then a FIELD statement is executed 
which sets a dunny string across the records preceeding the desired re- 
cord and sets up the string headers to point to the appropriate fields in 
the buffer. The following simple example requests a part number and then 
prints on the terminal the item nomenclature. The record is the same as 


used in the last example. 
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The program is very much like the previous example. Here the files are 
opened and the number of records is obtained. Then a part number is 
obtained from the terminal and is checked against the maximum record num- 
ber. If it is in range then it is divided by the number of logical rec- 
ords in a physical block abtaining: the block number as the quotient +) 

and the logical record within the block as the remainder of the division. 
The record is reac into the buffer if necessary and a FIELD statement is 
executed which sets up the desired logical record. Note that the variable 
DS is used twice in the same FIELD statement. The first time it is used 
to select the desired logical record and the second time to space past the 


characters which we do not need for this particular program. 


Randomly writing blocked records 1S very much Tike reading them. In fect 
it is necessary to read the record before it is written. This is done 
because other records which are in the same block may already have been 
written. Since we always read and write physical records from or to the 
burfer if we simply stored our information in the buffer and then did a 
PUT, anything which was a part of another logical record within the same 
block as the record we are writing would be destroyed. As an example 
of a program wh.ch writes a random blocked record we will take our pre- 
vious example and change it so that the operator was to replace the no- 
menclature of the part after it had been printed out. To do this we 
would insert the following statements between the third and forth lines 
from the end of the program. 

INPUT "NEW NOMENCLATURE": AS : 

LSET N$ = A$ UNLESS LEN(A$) = 0% : 

PUT #2%, RECORD Ri 
This would change the specific items nomenclature without altering any 
other information in the. file. Observe that if no information is entered 
then the old nomenclature is not changed. 
To summarize, to randomly read or write blocked records it is necessary 
to take the logical record number and divide it by the number of logical 
records contained in one physical block. The quotient of this division 
plus one is the physical biock number which contains the logical record 
desired. The remainder of the division is the number of logical records 
within the block which preceed the desired logical record within the 
block. When it is multiplied by the length of the logical record it is 
the numder of characters within the block which preceed the logical re- 
cord. When that product is used as the length of a dummy string vari- 


able in a FIELD statement then the next character described by the field 
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siavenent ts the first charecter of the Jesired logical record. 

In al] of our examples so far it has turned out to be very Rouvensene that 
the length of a logical record is a sub multiple of the length of a block 
(512 characters). It may appear that this is a little inveneeic: In 
practical situations the Togical record length is determined by the needs 
of the application. In most applications as many logical records as will 
fit are put in one physical block and the leftover characters in the block 
are simply wasted. In many cases the number of characters wasted is very 
small compared to the size of the file and this wastage is not a burden to 
the system. If it appears to be unreasonable for a santichiae application 
then spanned records can be used. In that case there will be no wastage 
but the program will be Somewhat larger and will execute a little more 
Slowly. Also certain useful functions will not be applicable to such a 
file. A detailed explanation of the use of spanned records must be de- 
ferred until the RECORDSIZE option is described infra. When the records 
do not span blocks then the method described above is applicable whether 
Or not the records exactly fill the block. We simply divide by the number 


of logical records which are contained within one Physical block. 


14, MORE ON OPEN - RECORDSIZE AND CLUSTERSIZE 

At this point we can take up several now options which are associated with 
the OPEN statement. First is the CLUSTERSIZE opticn. This is used to 
make access to large files more efficient. A complete discussion of the 
CLUSTERSIZE opticn is beyond the scope of these notes, however, a fow con- 
ments are in order. The inforination which RSTS keaps on the disk is div- 
ided into three parts: the file name, where the file is, and the data 
within the file. In a simple case the information about where the file is 


Stored is simply a list of the sector numbers of the sectors which moke up 


“F- Fe 


the file. Now we are not talking of the relative block numbers within a 
file which aeauNee earlier but of the actual hardware addresses of the 
blocks. Each file consists of one or more blocks and the blocks are alTo- 
cated from the supply of unused blocks maintained by the system. As a re- 
sult the blocks are randomly arranged and while they seem sequential to 

the program this is accomplished by the monitor's use-of the list of the 
blocks. In any case when a file is opened seven elements of this list are | 
placed in core in something called a "file window". When any of the seven 
blocks descriLed by the file window are requested RSTS simply looks up the 
actual physical address of that block in the window and then accesses the 
block. If a block which is not part of the window is requested then it is 
necessary to replace the: contents of the file window. This is called a 
"window turn". -.A window turn implies reading the location information 

from the disk which means that before we can do our data transfer we have 
to wait for the disk to transfer the information about where the block is. 
To reduce the overhead inherent in this reading of the directory when we 
want to read data we have defined a structure called a "cluster". A clus- 
ter is always a power of two (1,2,4,8,16,32,64,128, or 256). When we de- 
fine a file to have a clustersize of, say, 8, that means that the file is 
made up of clusters of eight blocks each. Now the list of locations that 
the monitor maintains is a list of clusters and the file window describes 
seven clusters rather than seven sectors. This is of course possible 

since it's only necessary to know where the first sector of each cluster 

is since the others will be immediately adjacent. The general rule to rem- 
ember is that the clustersize of a file should be such that seven times the 


clustersize is larger than the file and seven times the next smalier 
clustersize is smaller than the file. When this is not possible because 
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the file size is So yreat that it exceeds 1792 blocks then the clustersize 
Should be 256. ‘The clustersize of a file is established when the file is 
created and is used Wieaan eens file is accessed. To create a file 
named "FILE.DAT" with a clusters ize of sixteen we would use the following 
statement: . | 
100 OPEN "FILE.DAT" FOR OUTPUT AS FILE 4%, CLUSTERSIZE 16% 
The best clustersize can be calculated in a program if the size of the file 
to be created is known. Suppose we had a case where each logial record 
was to be 64 characters long. Thus exactly eight would fit into a block. 
The following program segment would find out how large the file was to be, 
open the file with the optimum clustersize, and then extend the file to 
its length. : | 
100 INPUT “HOW MANY RECORDS IN THE FILE"; IZ: 1% = 1%/8%+ 1%: 

" : re 1% UNTIL 7% * (2440%)> = 1% or J% = 82: 

OPEN "FILE.DAT" FOR OUTPUT AS FILE 11%, CLUSTERSIZE 2%% J% 

PUT #11%, RECORD 1% 
There is also a "device clustersize." This is the minimum clustersize 
which any file may have on a given disk. It is set by the system manager 
and is designed to reduce the extent to which disk accessing slows the 
system down. In the case Of very large disks a device clustersize is nec- 
essary simply to make it possible to address such large devices as the RPI? 
and RJP11 disks. 
The RECORDSIZE option, on the other hand, Jets us extend the length of the 
channel buffer and to read more information into it in one request. In our 
previous discussion we have always assumed that the size of a sector was 
ol2 characters and the size of the buffer was the same as the sector. This 


is not entirely true. The size of the sector is indeed fixed by the hard- 


ware but the size of the buffer can be any integral multiple of the size of 
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characters long, or 1024, or 1536, 
cr 2048, etc. Of course if you make the channel buffer bigger than 512 
characters then either the program will grow or you will run out of room. 
When the buffersize has been made larger than the minimum (512 characters) 
then a GET will cause the entire buffer to be filled by reading as many 
blocks as necessary. The FIELD statement works as it did before, however, 
the entire channel buffer can be mapped by the FIELD statement. When a PUT 
statement is executed the entire buffer is written into as many ( logically 
consecutive) blocks as necessary. A pointto be cautious about, however, 
is that the record specification in the GET and PUT statement still speci- 
fies which block is to be the first one read. Thus if we opened a file on 
channel 1% with a recordsize of 1024 characters as follows: 
100 OPEN "FILE" FOR INPUT AS FILE 1%, RECORDSIZE 1024% 
and then we proposed to read each block in the following manner: 
-110 FOR 13 = 1% TO NZ : 
GET +14, RECORD 1% 
PLEO Fl eie betwen 


NEXT 1% 
The effect would be that the first GET would read block number one into the 
first 512 characters of the buffer and then would read block number two in- 
to the next 512 characters of the buffer. The next time through the GET 
statement would start at block number two and would read blecks two and 
tnrce into the buffer. This is not wnat was wanted since block two (and 
every other block except the first) would be read (and processed ) twice. 
Once in the second half of the buffer and once in the first half. To make 
the program segment above wort as desired it is only necessary to change 
the FOR statement to read: | 


110 FOR 1% = 1% TO NA STEP 2% 
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how when the program is rua it will GET blocks one and two the first tine, 
then blocks three and four, and so on. | 
How we can consider spanned records. To briefly review our discussion of 
logical record types, a spanned record is one which may be stored.in two 
adjacent physical blocks. This being the case it is necessary to read and 
write more than one block in order to access a spanned record. There are 
two techniques which can be used to achieve this. The simplest is des- 
cribed here. This is to simply open the file with a large enough buffer- 
Size to contain the desired logical record. The recordsize to use in this 
case is calculated as follows: When L% is the length of the logical record 
in characters, the recordsize is, 

512% * ((L%/512%) + 2%) 
For most common cases we get the following: 


Size of logical record Buffersize 


Tess than 512 1024 

exactly 512 records don't span blocks 
513 through 1023 1536 
exactly 1024 records only span from odd 


to even blocks. Use a buffer 
size of 1024 


1025 through 1535 ; 2048 
exactly 1536 size of 1536 
1537 through 2047 2560 
exactly 2048 size of 2048 


For the simple cases above (logical record is 1024, 1536, or 2048 characters 
Jong) all that is necessary is to multiply the desired record number minus | 
by the number of blocks in each record and then to add one to the product. 

Thus if the logical recordsize 1s 1536 (three blocks of 512 characters) and 


wt 


we want to access record hs we would use the following statenent: 

100 GET #4%, RECORD 32° (NS - 15) + 12 
and then process the record in the norwal way remenbering that the FIELD 
statement must map 1$36 characters in the buffer if we access al] of the 


doa: 


Bee 


Whon the size of the logical record is not a convenient. integral multiple 


of 512 then we must use a more complex calculation to determine the block 
where the record starts and the number of characters in the buffer which 
preceed the record. We use these two numbers in the same way we used 
them when we used the Canadas method with unspanned records. In this 
case the calculation is as follows: 


a. Multiply the record number of the desired logical 
record by the length of the logical record. 

-b. Divide that product by 5123. That is physical 
sect r number ~-1 one of the blocks which contain 
the logical record. Use it plus one ina GET 
Statement. 

c., Multiply the quotient obtained in step b, above 
by 512% and subtract it from the product obtained 
in step a. That difference is the number of 
characters. in the buffer preceeding the desired 

record. 


(NOTE: This valid for files with<=2000 blocks unless 
double precision arithmetic is -used.) 


In the following example, the length of each logical record (L%) is forty 
characters. We want to retrieve the N% logical record. 


100 ain al FOR INPUT AS FILE 1%, RECORDSIZE 1024% 
y 0% : 


1000 REM This subroutine reads the N% logical record from the 
file. N% is set to the logical record number to read 
a Pe contains the length of the logical record. 

=Li * NS: 

Re = RI/512% 

CH = RI - 512% *RS 

GET #12, RECORD Re : 

PlC a ley: Ca Ao Digue caetenes 

RETURN . 


Our subroutine is called to read a logical record and it returns with the 
read executed and the buffer set up by the FIELD statement. As with block- 
ed records generally it is necessary to read a logical record before at- 
teinpting to write it to avoid modifying information in the other logical 


records in the same block. 
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The other method of dealiny with spanned records involves reading each 
block in which the desired record is located and copying it into the 
String data area. Writing is the opposite procedure. The routines to 


do this are complex and beyond the scope of these notes. 


15. FINDING DATA WITHIN A FILE 

At this point we have learned how to open and close files and how to read 
and write data into them both serially and randomly. When making random 
access to a file we have always specified the record number of the logical 
record in the file that we wanted to access. In some examples we simply 
Said that the record number would be the stock number or customer number. - 
In practice this is rarely satisfactory as such individual identifications 
frequently carry more information and also may have letters as well as 
numbers in them. Even if such Protlems did not exist there is the problen 
of re-using numbers when one item is discountinued and another assigned the 
Same number. In most cases it is necessary to establishe a mechanism for 
retrieving a record from a. file based on the information within the re- 
cord. Let's look at an example. We will take our example of the inventory 
locations file and we will include in the file an item stock: number of 
eight characters (either numbers or letters). The record definition table 


for this file is now as follows: 
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RECORD DEFINITION TASLE 


Field Type Variable Length - Description 
Number Nan Item Cumulative 
1. S L$ 5 0 Location of item 

by floor, bin, or rack 
1.1 B FS 1 0 Floor of building 
1.2 I BS 2 1 Bin number for item 
1.3 I RS 2 3 Rack number for item 
2: S S$ 8 5 Stock Number 
3. S NS 5] 13 Nomenclature of item 


Table 5. Reccvd Definition Table for recrtion by Stock Number File 

Qur task is to write a program which will. look up the location of an item 
given the stocknumber of the item. This might be part of a larger program 
which takes orders to be filled and places the items in the sequence on a 
packing list that wil] rest in the shortest trip through the warehouse. 
At any rate our current job is to find the record for an item if we know 
its stock number. The simplest solution would be to simply search through 
the entire file checking each record until the desired record was found. 
This is relatively inefficient. Since each logical record is sixty-four 
characters long, each block will contain eight logical records. If there 
are 10,000 item records then the file will consist of 1240 blocks and each 
time we search the file approximately 625 separate disk reads will have to 
be made. This could take a substantial amount of time. Although this may 
not be very efficient it is probably stil? worthwhile to code it as an 
exercise. The following program will accept the stocknumber from the 


terminal and print the location of that item on the terminal. 


19-59 


tel Crk “LOCATE TREN OR TMPHT fe RTL as 
bed #42, RECORD 4h 
FIELD #4%, SHY AS Le 


ie = Ova yess 


eye 8S es ay 
Bet re ae 7 
far TGFUT @S70OCK HUBBER: xe OT, ee EE ee 


PRINT "NOT A OYELID STORK MoREER, 
bOTQ «48 
126 FOR I# = 42 To uy 
Re = IN/GY + 44 
RIX = TX - GM oe CRY - 449 
GET #44, RECORO RE UNLESS FY = Ren 
ROY = hY 
FIELD #42, 64h # Bay A 
8X AS Sh. Sae feo 
126 IF S$ = HS THEN , 
PRINT "FOR STOCK MUNRER "; oe. 7 
es ; 


uy 
—? 
tt'p 


PE LER 7 Bory Co CS Cer a es 
PROGR @ THE PER Gee - Pas oS 


GOTG Lie 


od is ee he 
t Siem Oe - . 
er ie ua rw a } 7 ' a bate a x 
fr: jee * Poa ei ; * ‘ eae ie Be qi iM 
Lan r ae or "fs 
Lou Clyne 2) ae ee. 
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Row we can assume that on the average we will need to go half way through 
tne file before we find the item that we want so we will need to read the 
file (1/16) iene where N is the number of logical records in the file. ° 
If there are 10,000 logical records and we assume that each disk access 
takes around 200 milleseconds (one fifth of a second) then each response 
would take about two minutes. Not very good response from a computer. 
Note that the actual amount of time that it takes to access a record on 

a disk on a timeshared system depends in a large measure on how many ater 
users are trying io use the disks. As a first step toward efficiency 
let's try to reduce the number of disk reads by setting up a separate file 
containing just the stock numbers. The term key is used to refer to the 
field (or fields) within.a logical record which identify the record. In 
this case the stock number is the key and the file which contains the keys 
ie he key file. In this case we will simply set up another file called 
LOCATE.KEY which will contain the keys in the same sequence as the records 
are in the main file. All we do is to sequentially read the main file 
(LOCATE.INV) and transfer each key to another file which we write seguen~ 
tially. In each case the first logical record contains the number of 


logical records in the file. 
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LG FEN CREASE, Hoey die 


CREATES AN UNSORTES FEY FILE FORM 
"LGCATE. THY" AS “LOCATE. KE 


Jak OFEN "LOCRTE. INV" Foe INFUT AS FILE ih 
GET #44, RECORD 12 
FIELD #14, S2 AS LE 
Us = CYTEECLS) : 
ROk = 4X 
1 IRFUT FILE IRITIALIZATION 
Ua IS RUNSER GF RECORDS IN THE FILE 
PO RGA TS THe BLOCK CURRENTLY IN TRE LNPUT SLIEE ce 
L226 OPEN “LOCATE. KEY" FOR QUTPUT AS FILE 22, CLUSTERSIZE zee 
FIELE 24, SS AS eo 
LSET YFSCVTRECUR 
GSGH = 4k 
P GUTPUT FILE INITIALIZATION 
1 OPUT RECORD COUNT ee Aol RE CCE (: 
; ' Sea Tf THE BLOCK CURRENTLY IM THE GUTPUT BLES er 
A136 FOr Ix = 142 TO Ux 
Be = Tk/62 
Rie = [4 - RE # GE: 


SH = [k-642 : 
S4%¥ = 1% - SM « G4%- 


ROS RN 4 4K: 
Shot 4k! | 
CALCULATE ELSCK NUNBERS FINE OFESE TS 


fy 
Ni 


Rots PRP =e Hes. Th. eect ees 
Ce Se. ee oe ORS 


id GET ies RECUR Re ot 


RGR = BX 


FIELD 4%, €4N * BAY AS OS, SM AS ms, |e pe pee : 
RETRIEVE ONE KES FROM INPEIT FILE as ase 
Reo IS The GLOCE NUREE® FAD eae TS Tee ebioe OF eo 
156 PUT #28, BECORD SGX UNLESS Se = oh 
Ste = Se 
Pabiiele she ais CEN. AE pe ei ee ee ae 
Lee Shh Ss AS ' 


. LRT QU eu Fre 


' 
» 
HUMGER AMD San] 
BUFFER TE NECESS fay 


nas Pale I 


TRE ELGOE ge CET 


Ts Try 
t 


PUY #2. RECORD She 

CUUEE tees: 242 ; 

FE hef ' 

MRITE OUT LAST CPoETIAL) BUPFES fue chose Pres 
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ssinteniieh “ihre, Gane OR geeS “ape ern oe: Gun aang Suet ek Suge Sas 
tho inain file then there arc 10,000 keys in the key file. Since each key 
is eight characters long, 64 of thom will fit into one disk block. Thus 
the key file will be 157 blocks and on the average we will need to go through 
one-half of it to find a given key. Thus we will need to” read only 79 
blocks which at 200 miriececonte per read is 15.8 seconds. We still need 
to read one block out of the main file so the total time to retrieve the 
record is just siueeen seconds which is much patter than two minutes. The 
program is not complex. It uses the remainder method to access both files. 
First the initialization for the input file obtains the number of records 
in the input file. Then we create the output file and put the number of 
records in its first logical record. © Then in the main loop (lines 130, 
140, 150) we read one logical record from channel one (the main file), 
extract the key, and write it into the key file. When all the keys have Been 


extracted from the main file and transferred to the key file we write out 


the last buffer in the key file at line 160, close both channels and stop. 


Now that we have created the key file we can use it to access a record in 
the main file. We will use tne sane problem as before. We open both files 
and then obtain the stock number (key) to be searched for from the terminal. 
Next we search through the key file for the key record which ‘matches the 
stock number. Wien we find it we then retrieve the corresponding data 
‘record from the data file. We verify that the key in the data record is 
the one we are looking for. If it isn't that usually means that someone 
has altered or modified the data file since the last time the Key Tile was 
‘ciated. | In this case it is necessary to recreate the key file. If the 
key's do match then the required information is printed on the terminal 
and more ‘input is obtained. The program stops when an error occurs or when 
the operator types either "DONE" or "STOP". Now here is the program which 


will retrieve data records after searching the key file. 


(¢-b3 


A600 FCW LGCHTE RECORD rt 


THIS 
FILE GY SEGECHING THE ery 
BCCOSSING THE MAIN FILE. 


Fit 


104! 
110 GREEN 


CPERN 


"LOCKHTE. rye 
"LOCATE. KEY" 
PTELO: 44 75-82 
FIELD #22, &7 


ates 


FOR INPUT FS 
FOR IMEUT &S 
Aa LE : 
AS VE 


FI 
Fl 


GEY #42, RECORD 4% KOZ 
GET #2%, RCCORD 1x S02 


GOFER EQTH FILES 
LET U2 CVTELCLE) 
IF UR <C> C¥TE2CNS) THEN 
FEINT “LENGTHS ue 
CLOSE 427,22 


pad 
= 


5 
4 


@ IS VE NUMEES OF & 
RGZ RNG SG&2 ARE THE & 
A2@ TRPUT “STOCK NUNEER*; x¢ : 
GOTG 1G IF x¢ "CONE ® 
IF LENCX#) <> &% THEN . 
PRINT "NOT & oes £T 
GOTO 126 
CHECK FOR ENE OF Ut 


Gk xt 


— 


14@ FOR 1% = 4% Ta uy 
S2 = 12/7642 — i 
Si#v= 32 - GSveeéay: 
SA = S24 4 42 : 
GET #22, RECORO Sk UNLESS cy 


S@4 = S2% 
FIELD #22, 
GOTG 450 IF 
NEXT 12 : 
FRIKT 
GOTO 


EZ 
Xt 


41% AS ne 
Vr 


7 


~_ 
_ 


“ITEN ROT FOutt 
136 
MAIN LOOP. CALCULATE 
OFFSET (S42) Fok REY 
FOR REQUESTED KEY. IF 
AND TRY FGRIN, 


IN FILE 


156 = If 7 &2 
Rig = Tf - RR # &# 
Rio = RA + 1k : 


UNLESS fe 


GET #412, RECORD fe 

ROX = RE 

FIELD &in, G4% 8 RAY BS DE, 4 
224 WS RES C2 AS St, § 


RETRIEVE GATA RE COS E Fee Fit. 


BLOCK 
Re IS 
THER 
PRIKT 
FRINY 
PRINT 
CLOSE 44, 2% 


Cities 
PRO 


RA 
RHE 


CFF SET, 
NE TS 


“FILES ARE 


Es; HT, OE, VS 
ST CF 


TF THE EFY 
Ih THE ry 
DPARGROS TIC 
PEINT "FOR Steck Munecree 
"FLOUR"; fSoTpcrs3; 
"BIR"; OVTSONCES); 
“RAC; C¥TS& ORS) 
PRINT “NOMERCL A TEET © 
Gola aka ! 
PU GT EP eG 
> ENG 


INO OTHE 
FILE Ver 
PRP ORRAT I 

170 


. ote. 
» SSG 


AiG CLOSE 


“a Pery 
4, fee fa ve 


LICE 


PROGRAM FIROS @ Lotto Pio Tee 


“REY FILE MUST gr PECON 


COT FILE Paes, 


Peep! 
“THE 


PVE MTC LUnst pres. 
FOFOF THE KEY fii Tatty 


LE 
LE 


a4 


» BONS T MATCH" 
i 


ECORDS I THE FILE 
LOCK CURRENTLY IN ERCH ELIEFER 


— 
— 


"STOR" 


fiCK HUME BER") KE 


CR VALICO STOCK NUMBER 


SG% 


AS WE 


nw. 
, 


et 


ELC CON fips 
FILE. PERO RICORD tab CHECK 

KOT FOL BRET © pene PE SSAGE 
= FG 
2 AS FS, of RO Bs, 
tA ORE Is 

FoR FS 

Fe FS FLOOS, Eat ye epee, 

CESURIT RTI. Sf 1S JHE ery 


ree. 


STRUCTED" 


TRERE 12 Fi 
He ST Cte 


LOT ro 15"; 


still will nced fureeen seconds or morc to locate the desired information 
and this is much longer ree the Spent. should have to wait. He need a 
more efficient method of searching the key file. We can reduce the time 
jt takes to search the key file by first putting in the file not only the 
key itself but also the logical record number which it represents. Then 
we could sort the key file so that the keys were in alphabetical order. 
Then with the file sorted we could use a binary search to find the re- 
quested key and along with the key would be the logical record number of 
the Scivesnonding record. (if you don't know what a binary search is it 
will be defined below), With a binary search the number of disk reads re- 
quired will be Somewhat less than the power to which two must be raised to 
equal or exceed the number of logical records in the file. (In other words, 
the logarithm to the base two of the number of records in the file). Thus 
for a file having 10,000 records the number of disk accesses required would 
be Log, (10,000) or 14. This can be reduced by the log. of the number of 
keys stored within one biock. Now our keys are somewhat longer than be- 
fore. Previously we had a key of eight characters. Now we have the same 
eight characters plus two more used to store the logical record number (in 
CYTES format). Since each key is now ten characters long we can put 5] 
such keys in one block and the log, (51) is 5. Thus we would need to read 
the disk only nine times which would require only about two seconds to 
eccess the file. There are other still faster methods but first we should 
understand how this one works. 

ine osvious first question is how is the key file te be placed itn order. 


There are many methods of sorting data and entire books have been written 
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about the relative advantaues of cach. Writing an efficient sorting piro- 
gram requires extensive knowledge and much effort. For the RSTS user, 
however, this is not necessary as an efficient file sorting package is ' 
supplied by Digital Eauiauane Corporation. A manual is provided which ex- 
plains how the sort package is used. It both extracts the keys from the 
data file and sorts the keys into alphabetic sequence. As an option it 
will sort the data file itself but this is hardly ever necessary. The 
user Should read the Sort manual before attempting to use the techniques 
described below. For our purposes it is sufficient to say that the sort 
package will create the sorted keyfile which we need to use with a binary 
search. (Note: If you don't have access to the sort nackage then use 

the randomizing or hashing technique described below.) 

To make a binary search (also called the half-interval method). We simply 
take a sequence of values whicr is in avder and search for one of then by 
seeing if it is in the first or second half of the values. If it is in 
the first half then we look to see if it is in the first or second half of 
that half and so on until we have found the vaiue we are looking for. Al- 
though we are mostly concerned with record 1/0 fiies, we will take as our 


first example a binary search of a virtual array. tie will use the sorted 


- file of names which we created in the program on page ~ ;: Here we have a 
Tile of 200 names each 64 long which we have pleced is alphabetical order. 


Kow we will search for a particular name. First we open the file and da- 


Clare it to be a virtual array. 


NS 


100 OPEN "NAMES" FOR INPUT AS FILE 
| DIM #2%, H$(200)+ 645; 


Next we obtain the name to search for in the variabie } 


> 
4f> 


110 INPUT "WHICH NAME"; = AS 


he as Oe 


Now we set up the binary search In this cese L% is the lower Tinit of 
the search and U% is the ‘Re limit of the search. CZ is calculated from 
L% and UZ and is the center of the interval between L% and U%. Initially 
L% is 0% and U% is 200% thus making C% be 100%. | 

110 L¥ = 0% | 

— US = 200% 

120 C% = (L% + U%Z)/2% 
Now we can test whether we have found A$ in the array. If we have, we 
transfer to line 200 with C% = the index where we found it. 

130 IF N$(L% 


) 
140 IF N$(U%) 
150 IF NS(C2) 


A$ THEN C3 = LZ : GOTO 200 
AS THEN C% = UZ : GOTO 200 
A$ THEN GOTO 200 


homou 


Now that we know that we have not exactly found A$ we want to know whether 
it is above or below N$(C%) in the sorted array. When we determine this 
we change either L% or U% so that we now have a new interval which is just 
half as large as the previous one. 
160 IF AS <NS(C%) THEN U% = CX ELSE L% = Cf 
Now if U% and L% are the same or differ by one then we know that A$ is not 
. to be found in the virtual array NS otherwise we check the new interval. the 
same aS we did with the previous one. 

170 GOTO 120 UNLESS UZ-L4E 1% 


PRINT "COULD NOT FIND NAME": AS 
GOTC 110 


When we find the name we could print it out or co whatever we now need to 
do. 


200 PRINT "FOUND IT"; AS; "IS NAME NUMBER"; C%; “IN THE FILE": 
CLOSE 2% : END 


Although it is useful for an example, the overhead associated with virtual 
arrays is so great that this is not a feasible way of writing a production 
program. In a real situation record J/0 should be used when the binary 


search is being made. What follows is a simmle program to make a binary 


= Vee? 


3 . 


search of a sorted key file from our previous example; the Inventory Location 


File. 


LF -bO4 


he method described above is reasonably effective; however, there is stil] 
substantial mate effort. In our exemple we found it necessary to make 
nine disk accesses in order to find one data record.. This is, in general, 
not efficient enough for many applications although there are Situations in 
which it is fully adequate. The next increase in efficiency comes from 
trading off core space (and thus program size) for reduced time in locat- 
ing a record. We reduce the number of necessary disk accesses to one to 
the sorted key file and one to the data file by maintaining some information 
in core which permits us to, obtain the block of the sorted key file shack 
contains the key we are seraching for. In our example we had 10,000 data 
records, each 64 characters long. Thus we also had 10,000 keys each of 
which was 10 characters ‘long (eight for the actual key and two for the log- 
ical record number). Since each block is 512 characters long, each will 
hold exactly 51 keys. The sorted key file is therefore 196 blocks long. 
-We could now set up an array in core which would contain the first key in 
each block of the sorted key file. Then our technique to find a specified 
record would be to first perform a binary search on the in-core array. The 
outcome of this would be the block number of the block of the sorted key 
file which contained the key of the record we are looking for. We 

would read that block and perform a4 binary search on its contents to deter- 
ine the actual recora number of the desired logical record. Then we 
would fetch the block from the data file which contained that record. Thus 
we obtain the record we desire, out of a total of 10,099 records, with two 
disk accesses, one to the sorted key file, and one to the data file. 

If enough core to place the array of keys in core is not availeble, then it 
is possible to make that information part of the sorted key file and search 


the buffer twice. This increases the number of disk accesses by one but 
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Climinates the need for the array in core. 

In our example we had 10,000 keys in 196 blocks of 512 characters. If we use 
@ recordsize of 1024 characters we would read two blocks of the sorted key 
file at a time. Thus we would need on our preliminary search only °8 keys 

of 8 characters each. These could be put into two blocks appended to the 
sorted key file and then searched in the buffer by the same routine which 
made the binary search on the key file. Using this technique we could 

expect to use only six-tenths of a second in retrieving a specific record. 
There are mary variations on this technique which are beyond the scope of 


these notes. 


16. HASHED KEYS 

Another technique which is often used to access data is that of hashed or 
randomized keys. This method is based on the maintenance of a key file in 
a random sequence which is directly accessed based on the value of the hey. 
The preceeding cryptic remark is best explained by a very simple example. 
Let us suppose that we have a key consisting of two alphabetic characters.. 
Initially our key file is empty. As entries are made in the data file the 
keys are posted to the key file. The location in the key file into which 
the keys ere placed is determined by adding the ASCII values of the two 
characters of the key and dividing by the number of possible entries in the 
key file. We use the remainder of this division as the position in the key 
file for that key. For our example we will use a key file having just 
eleven possible entries. First we wil] zero the key file and then consider 
each entry in the data Mle. Suppose the first key wes "EG". The ASCII 
value of "E" is 69 and that of "G* is 7), Thetr sum is 146 and the re- 
nainder of 140/11 is &. Thus in logical recerd 2 of the key file we would 


: : aes 23 t ; 
geal sobs gah ie ak Se Bape. CAs eee Ady on ee 
(Eur: TAPE ae CORE eae y SPOPAne data 


put the key "EG" and*the toqica 


record hee. Suppose the next key was "FA". The ASCIT value "F" is 
70 and that of "A" is 65. Their sun is 135 and the remainder of 135/11 jis 
3. Thus we would post to position 3 of the key file the key "FA" and the 
logical record number of the second record. The third iseren record of 
the data file we find has a key of "BF". The ASCII values of "B" and “F" 
are 66 and 70 and their sum is 136. The remainder of 136/11 is 4 so we 
post the key "BF" and the logical record number 3 to the key file. The key. 
file now looks like this: 


Entry Key Data 


Number ~ Record 
0 - 0 
] - 0} 
2: - 0 
| 3 FA 2 
“ 4 BF 3 
as - 0 
6 - "0 
7 - 0 
8 EG 1 
9 - 0 
19 - 0 


At this point three keys have been entered. When we want to retrieve the 
record for which the key is "FA" we perform the same arithmetic operations 
on it and find that it is to be found in position 3 of the key file. We 
look there, verify that position three contains the desired key and also 
that the corresponding data record is in position 2 of the data file. 

how Suppose that we found that the key fer logical record four was "HD". 
The ASCIT values for "H" and "D" are 72 and 68. Their sum is 146 and the 
remainder of 140/11 is 8. Thus we post the key "HD" in position eight, or 
do we? When we try to post "HO" in position eight we discover that pos- 
ition cight is already occupicd hy FG. These two keys are called Synonyms 
and are delt with in the following way. If we try Lo post a key and can- 
not because its position in the key file is already: occupied, we try the 
next position. lf it is also occupied we try the next one. Eventually we 
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will find an unoccupied one and will post it there or the key file wil] 
be full. This is not very guod. Generally in order to minimize the 
amount of searching which takes piace when synonyms occur it is des- 
irable to have a substantial amount of empty space in the key file. 
This is usually not a serious defect since the size of the key file is 
usually small compared to the size of the data tile. About half aaain 
as many possible keys in the key file as there are data records in the 
data file is generally adequate. 

Let's add two more keys to the key filc. The key "AC" yields a hashed 
value of 1 and the key "BA" a value cf G. Now the key file looks Tike 
this: ; 


Entry Key Data 
Nuinber | Recore 


EG 
HO 


we 


be 
OwoOn~w A NS WDM — © 
{ 
Pee OMUmOWN ON 


io 7 


Typically all we do is perform some arithmetic on the key and obtain 

from that a record number in a key-file. We use the paissuder method to 
obtain that record from the key file end comparc the stored velue of the 
key with the one we are searching for. If they watch we have found the 


record we want and can fetch it from the data file. If not we cen exam 


ine the next key in the key file. Lither we will find ene that matches 


or we will find eventually an empty record. In the lattor case ac know 
that the desired key igs not in the kev ffte Gan ef the AGvanLarces af 


this technique is that we can post new rerrads ts So, hey fie are Lime 


be a pe . 4 Py ee chick penises ye Wit date ae hoe teat uel d- ; 
We Want Wa OUr- Glaborate wnrtsr ies ih, Sie le er. he eat od ay 


file adding records implied sorting tho new records into the file and then 

econstructing the preliminary key table, In the case of the randomized 
or hashed key file we obtain the record we need in typically one access to 
the key file and one to the cata file. If there are many synonyms then we 
might have to read another block from the key file but that is unusual if 
the file is adequately large and the randomizing function is adequate. This 
latter is not always that easy to determine; however, one which has often 
been effective is to take the characters of the key from left to right; form 
a sum by multiplying the previous sum by three and adding the ASCII value 
of the next character to the sum. When all characters in the key have been 
summed then divide by a prime number slightly smaller than the maximum num- 
ber of keys in the key file. In BASIC-PLUS this would be as follows: A$ 
‘is the key and N% is the key position. P% is the prime number just less 
than the maximum position in the key file. 

100 N% = 0% 


N% = ABS(N% * 3% + ASCTI(MID(AS, 1%, 1%))) FOR 1% = 1% TO LEN(AS) 
N% = NZ - PZ * (NY / Pa) 


More complex schemes are availabie and can be found in many books on file 
and data structures. | 

A cautionary note is in order about the importance of not deleting entries 
in a hashed key file. . The reason that keys must not be deleted is simply 
that they may be in a sequence of synonyms and replacing one by a2 series of 
blanks would cause a Search to fail when in fact the doctuea key was simply 
farther down in the key file. The comion solution to this (if deletions are 
to occur on line) is to reserve a byte in the key file to indicate that the 
referenced record is deleted end should not be accessed. Periodically the 
key file is then reconstructed from the data file and the keys corresponding 


to the deleted records are removed. 
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Here follow two programs based on cur previous cxample, the inventory loc- 
y 


ations file. The first one taxes the inventory locations file and posts a4 
key file based on the eight character key in position 6 through thirteen. 
The second retrieves records by usisu the key file to find the record in 


the data record file. 


106 


116 


138 


146 


156 


166 


266 


216 


WER 0 CREATE HASHED KEY FILE 


THIS PROGRAM Cee; AIoS fe WASHE 


tere. 


i 
~ KEY FILE FROM THE LOCATE. INY FILE 


GREN “LOCATE. INV" FOR INEUT Me FILE 4% 
GET #42, RECORE 42 
FIELD #42, S2 AS Lg 
Us = CVTEZcL$) 
FOZ = 42 : 
PINFUT FICE INITIALIZeT LON 
UZ 1S THE NUHEER OF SE CORDES IN THE FILE 


RaZ 3S Tne BLOCK CURRENTLY In THE INFUT EUFFER: 


= 4.5 # UZ 
Jn = 4% 
Je = IZ + 12 UNTIL 2% # (2% 7 SH) >= ULE OF Ie = 
OPEN “LOCATE. KEY" FOR GUTFUT AS FILE 2%, CLUSTERS 
ICUMPUTE APPROPRIATE CLUSTERSIZE FOR THE 
KEY FILE AND GFEN IT. 
PRINT “PLEASE INFLT A PRIME WUMEER SMALLER THAN ¢; 
INPUT BY 
FIELO #22, 462 AS FE 
LSET Pf = CYTNECRY) 
1 Pe IS THE PRIME NUMEER. 


IT 1S STOREG IN THE FIRST LOGICAL RECORG OF THE 


KES’ FILE. 
$62 = 42 3 
FOR Ji = 42 TQ uisz 


viz = IZ 7 54x: 
U2% = J2 - (S44 # J4K) 

Vid = TAN + 42 : 

PUT &22, RECORD SGX UNLESS Sax = 4x 
Sa% = J1¥ 


£02 1S THE RECORD IN THE GUTFUT EWE FER: 


FIELD F2%, 16% © Jn AS bs, Ee AS YF, 2h 
LSET WE = SPRCESCEX) : 
LSET Rf = C¥YTZ¢¢0%) 
NEXT J2 
PUT 822, RECORD Sax 
FILL TRE REY FILE WITH GLANS 


FOR 42 TQ UX 
1 < 


RY = Rao + 4% : ; 

GET #12, RECURG RY UNLESS RY = BOY 

BGS = RX : 

FIELG #14, 64% © RAN AS bt, SY BS CE, SY AS S¢ 


RETRIEVE EACH RECORD FORM THE betes FILE. 


Jf = 62 
Us = 
J2 = Gh - Peal I“eeyy) 

ICAL CUL RTE THE Se VALUE OF THE KEY 
On 2 hee TF ae eX 
Jie = J4 7 Sih: 
den = Gk - S4% © Jar 
W412 = Jig + 46 : 
GET ten, RPECURE JY UNLESS Ja = Ce 
SOX = Jie 

DETURGINE FOLTTIGN IN FEY FILE For THIS 
FYELO @2%, (hi + Je as br, os as ‘fy, 22 RS RE 
IF YS <> BRICLS COX THER 


PSOE IF THE J TH POSITION IN THE 
TS EMPIY @N& TF NOT Tey Inet 


LSET We = Gs 
LOFT. RE os CUTYES CTE) 
TUT B22, RECORE ch 


RENT 12 


ABGSC Ike sy + ASCIICHIO(S$,K#,392))) FOR RELY 


oe 
2] 


cE 


as 
iy 


FS. 


rey 


rey 


een 


eS 


FE 


on 


rc 


~ 


rye 


Uk 


TOR PQULD fh ROLE FOR fr sa REETE TT Ct Fitete TEN THE 


ROST CHIR kECORD 
CLUSE 32-22 : 
PRINT “ALL BONE’ DORE 


(FG -2S— 


The progran : create the hashed key file starts at line 110 by opening 
the input file and determining the number of records in it. At line 120 | 
the size of the hashed key file is determined by multiplying the number of 
records in the data file by i 1/2. Then the cluster Size for the key file 
is determined and the key file is opened for output. At line 130 a prime 
number which will be used in the hashing algorithm is obtained from the 
terminal. This could have been calculated by the program. The prime num- 
ber is stored in the first (i.e.: zeroth) logical record of the key file. 
This is so that the program(s) which access the key file will know which | 
prime number to use. The FOR loop at line 140 and 150 serve to fill the 
Key file with blanks. These initial values im the key file are necessary 
so that we can determine, when we post the records to the file, whether 
or not a particular key file position has been already used and when we 
retrieve records to determine if a key is not in the file. The main loop 
in the program, extending from line 160 to line 200 actually posts the 
keys from the data file to the key file. The code in line 150 serves to 
sequentially read each record in the data file. At line 170 each key is 
nashed and its position in the key file (J%) is determined. At line 180 
that record is read from the key file and (at 190) if it is blank the 

key and the logical record number of the corresponding data record is writ- 


ten to the key file. lf the position is not blank then a synonym has 


occurred and we try the next key position. In this code we test for a pocs- 
thle “vrap-arouad" condition in which we search a chain of synenyus off the 
end of the file. In this case we simply go to record number OLE. (Reman- 


ber that record zero contains the prime number.) Finally at 210 we close 
the files anc terminate the program, At this point we have a cata file. 


" Pr Batau ‘ 2 icp alee 3 Jar Tomas £4 ie Ri ora po geo ek 
LOCATE.INY" and its corresponding key file, “LOCATE.REY". 
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We are now 
ready to randomly access records in the data file uSing information con- 
tained. in the key file. The next program does that. It obtains a Stock 
numser from the terminal, locates the record in the data file by using the 


key file and then prints the location information on the terminal. 


At line 110 the data and key files . are opened and the number of records in 
the data file as well as the prime nine for ‘the hash code computation are 
read from the fires. In Tine 130 we obtain the stock number from the term- 
inal and check for a valid length and for the end of the job. If neither 
we calculate the hash code at line 140 and retrieve that key from the key 
file at line 150. Line 160 checks to see if there is a valid key at that 
location. If not then there is no record for the specified stock number 
‘and the terminal user is so infcrmed. Tf the key is not blank then a check 
is made to see if the desired stock number is there or if it js a synonyn. 
If the latter is present then the hashed index is incremented and we try 
the next key. When the key is found then the record specified by the last 
two characters of the key (1%) is retrieved from the data file. This oc- 
currs at line 190. A check is made to verify that the key in the key file 
and the key in the data record are the same. If not then the files are 
inconsistent (i.e. one has been altered since the key file was created). 
and the key file must be recreated, At line 200 the requested information 
is printed on the terminal end the pregram asks for enother stock number. 
bots vorthwhi te to compare this pregran with the one which did the same 
Job by serially scarching the key file to see the reduction in the nuaber 
of disk accesses. Typically only two disk accesses are required to loc- 


ate any record in this file. 
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16 


464! 
116 


136 


146 


15¢ 


166 


186 


2gu 


205 


24d & 


REN 


OPE 
GFE 


INF 


vik 


1F 


IF 


4 


LOCKUP ReCORD JIN FILE 


THIS PROGEEN PINGS tf LocmtiaN iy Tur PROT ary 
LOChTIOGNS FILE fy UASuEI Tae ney SUPRPLICG Feo THE 
TEEMIRAL RRO LOGKING IN THE HRGHED Rey FILE Fore THE 
RECUR® RUMEER OF THE GhTh FECORE 


RONWLOCATE. INV" FOR INPUT AS FILO 17 
KO"LOCATE. KEV" FOR INPUT fiS FILE 2% 
FIELD #4124, Se mS Lt ; 

FIELD #22, 410% fG FE 


GOT #42, RECORD 12 Rie = 42 
GET tec, RECORD 412 CA = 412 


'GPEH EQTH FILES 
C¥TERCLS) 
UVEEZCRE) 
{UZ 1S TRE NUMBER OF RECORDS Ino THE CATA FILE 
Pe IS THE MAGIC FRIWE HUMBER User FOR HASHING THe FEY 
RG“ ANE Sok Gee THE RECORDS CURRENTLY I THE CUP FOR: 
UT "STOCK NUMGER"; we ; 
GOTO 246 IF &X¢="—bOnE" OR HF = "CTP 
IF LENCX$) <> &¢% THER 
PRINT “NOT A VALIO STOCK NUMEER 
GOTG 126 
"GET DESTRED STOCK NUMBER ANG CHECK LENGT# 


a 
song 
not 


= 2 : 

J2 = ABSCINeEY + ASCIICMIPCNS, KEL 42 OFOR KX = 44 bu se 
Uf = U2 - FZ # C927 FY) 

Jvio= 42 IF Je = Ge - 


' CALCULATE THE HASHED KEY WRLUE 
= J27512 : 
J22 = 74 - S4¥ «8 J4x 
G44 = J4% + 42: 
GET #24, FECOEE 12 UNLESS. J44 = Gay 
G62 = J4i% 
FIELD #24, 162% © Jor as ps, Ee FG VS. SY FS ket: 
'GET Ttle INCICATER KEY 
YF = SPACES es THEN 
PRINT “THERE 1S ho RECORD CORRESPONDING To SPOT pees e ae ae 
GUTU 136 
YS <> MF THEN 
Jf = 34 + 42 
a = Ze 1F I2 D4. * UY 
GOTO 156 
' GOT FOSYNONYM FoR ee So TRY THE NENT POST TICY 
= CV¥VTER CRED 
RA = Ik fax : 
Rie = Tk - RE ow oy 
PAO RA + 414 
GET (41%, RECORD RE UNLESS pot = Re 
Ray = Re : 
PGET TRF BLOCK WHICH Hes 
PIER OEL Ga? a RE Ae Be ae BS 
G2 FS 68, Sake Re Ne : 
IF ¥$ €> Se THER 
PRINT "PILES AGE Jeoonspstenr - EES Fila, due es 
“ PLCONSTEUCTED. " : 
ChUSE- diy, Be [ST or 
‘Tt VERY SEETOUS PROGBLER Hees 


TRE Th BE CORD 


HE 
Pte cae AE Tae BSS oe oe 


PRINT “Fak STOCK RUNECR  #; $5 "2 TREE DGG PO pais a 


Co 


PRINT “FLOOR "3; mecEy 
"BIN "ZS CVTLECE 
MR RE ONG CWT ENE 
PIRY “"ROMENCLITURE "3 on 
CTO Azo 
FOUND TRE ITEM SQ PRIN? THE TRPORTBT I OM Th THE Ibe, 
SE S98, PY rE 


17, VARIABLE LERSTH RECORDS 

In all of cheenhoniGis discussions it has been assumed that the individual 
_records in the files were all of the same Tength. This is the case in most 
data processing applications. Usually comparable information is to be 
fiaintained pertaining to each item described by the data in the file. There 
do arise, however, cases in which it is desirable to have records of 
varying length. There are several ways to handle these. If there is no need 
for random access then the data can simply be processed using the serial 
input/output statements, INPUT and PRINT. In this case the records are 
delimited in the file by carriage-return line-feed characters and the rec- 
ord deblocking is handled by the BASIC-PLUS run time system. Generally 

the length of each record is stored in the file either explicitly as a 
character count or implicitly as a character which separates the records. 
When random access is needed then some kind of key file must be used. 

After the data file has been created it is necessary to create a key file. 
It would have within it the key, the block within which the record 

Starts and the character position within the block where the record 
starts. This file could be arranged in the same sequence as the data file, 
it could be sorted, or it could be randomized as described above. Whichever, 
procedure is used the technique used to randomly locate a variable length 
record in a file is to determine the block and starting address of the 
record from the key ‘file and then to GET the block which contains the rec- 


ord. The length is deteriinea from the record and a FIELD statement is 
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used to map the record. Then the data is availeble for processing unless 
the record snane a block in which case it is necessary to move the partial 
record into the string data area and GET the next block. The remainder of 
the record is then concatenated, in the string data area, ee the first 
part and the record can be processed. Rewriting a variable length record 
in situ is possible as long as the length of the record does not increase. 
If the length increases then more complicated methods are needed. . One 
which is sometimes used in this case is to provide a field in the record 
to indicate where the record has been moved when it was rewritten and to 
provide some space at the end of the file for writing records which no 
longer fit in their original positions. Thus when a record is altered so 
that its length is changed it is rewritten at the end of the file. In its 
old location (the one pointed to by the key file) the record is changed so 
that a field contains the block number and character offsct where the rec- 
ord is now located. When the record is accessed it is first necessary: to 
determine whether the record has moved and if so to access it at its new 
location. Alternatively the record could be rewritten at the end of the 
file and the key file updated to point to the new location of the record. 
In this type of file processing it is necessary to provide programs which 
re-organize the files so as to reclaim the space lost when a record is 
rewritten in another location or when a record becosies shorter. Such a 
program would copy the data file, eliminating the unused records and would 
reconstruct the key file. | 

Now let's look at an example of this type cf file. We will have a file 
which contains information about inventory jiems. In particular it will 
contain records of purchases of items and the prices paid far the iters. 
This is used to calculate an aged cost of Inventory. Thus we can take the 


number of items on hand and assunic thai they represent the last purchases 


1G - 5 
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ently and subtract it 
from the number on hand. If there gre more on hand then we take the next 
most recent receipt of those itenis and subtract it from the remainder on 
hand and so ai until all items on hand have been assigned to the receipts. 
Then costs can be calculated by applying the cost data for each receipt to. 
the number of items on hand from that receipt. When items are received 
three new fields are added to the record pertaining to that item. Period~ 


ically the fields which no longer are applicable (i.e. have been exhaust- 


ed) are removed from the file. The record layout for the data file is as 


follows: | 
RECORD DEFINITION TABLE 

Field Type . Name Length - Description 

Number | | 

a I L$ 2 Length of record in bytes 
2 I Q$ 2 Quantity on hand 
3 S S$ 8 Stock number (key) 
4, I BS 2 Block for link record 
5. I 0$ 2 Offset for link | 
6.1 S J$ 9 Date of receipt 
6.2 I NS 2 Quantity received 
6.3 FZ C$ 8 Unit cost 7 


(NOTE: 6.1-6.3 repeat as many times as needed) 

Table 6. Record Definition Table | 
The first field in each record is the character count for the record, j.e. 
the number of characters in the record. The next field is the quantity of 
each item which is on hand. The third field is the key, an eight character 
alphanumeric stock number. This 1s wnat we will use to post to the key 
file and to access the record randomly. We will maintain the fiie in stock 
number sequence for case in Generating reports. The next two fields are 
used to indicate that the record has been moved in the course of being re- 
written. If CVT$S(BS) is O% then the original record is the valid one and 


con be used . Otherwise BS contains the block number of the block where 
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the record has moved and O$ coutains the offset into the block in charec- 
ters, Even after pursuing the record in this manner it is necessary to 

check BS and 0$ in the new record to see if it has moved from there. The 
actual data cannot be used until the record for that stock number has been 
located with 0$ containing a zero. Next in the record we have the variable 
length elements J$, N$ and C$. These contain the date of the receipt in 
—DD-Mmm-YY format, the quantity received, and the unit cost of the items. 
These three fields are repeated once for each active receipt. Thus a rec- 
ord which has one active receipt will consist of 35 characters; one which 
has two active receipts will consist of 54 characters and so on. Let's 
first consider a program to create a hashed key file. At the beginning of 
the data file we have some useful information. In the first logical rec- 
ord we have the total number of records in the file, the block and charac- 
ter offset of the next available position in the file (for use in rewrit- 
ting records which grow). Finally we have the actual length of the file in 
blocks. After we'have the key file established then we-can write a pro- 
gram which processes incoming receipts and updates the quantity on hand 

and adds a field which describes the new receipt. Finally we could print 
out the aged inventory report. We would maintain the data file in stock 
number sequence. The record forinat for the key file is eight characters 

of key, two of block number (in CVT?S format) and iwo for the character 
offset into the block (also in CVT&SS format). There are thus 42 keys per 
block and each key is 12 characters long. Now let's look in some detail 

at the program which creates the hashed key file. It reads the file 
serially assembling each logical record and posts to the key file the pos- 
ition of each data record and the key. Note that logical records may ba 
allowed to span blocks. In some cases (where the records are short even 


if variable in length) this can be avoided by simply placing a signal 
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character ‘(generally a CHRS/255¢) in the firs character following the last 
logical record which would fit in a block. Then the program would simply 


get the next block and would not have to try to assemble a record from two 


blocks. This docs waste sone Storage space bul can result in more efficient 


programs. 


18. FILE DESIGN 

These.notes are intended to provide some of the technical information about 
the file handiing facilities available in RSTS and Enea used 
techniques. At this point you should have a paaeonably complete under- 
standing of record 1/0 and disk files. What fol lows are a few comments on 
recommended design practices. This is hardly corp eheneive: If you want a 
discussion of files in sence then 4 eexebool on data processing tech-_ 
niques is in order. When designing the files for a System it is wise to 


keep in mind the following points: 

1. The larger a file is (total size) the loncer it takes 
to access a single record. This is sowowhat true re- 
gardless of the type of access. If the records in a 
file are large- then consideration could be given to 
dividing the file into two (or more) files each with 
smaller records. This is particularly effective when 
only some of the information in a record is used on- 
line and the rest is used only for off-line pro- 
cessing. | 


2. The "natural" sizes of logical records are powers of 
two characters less than or equal te 512. (i.e. 1, 
2, “4, 8; 16, 32, 64, 128, 255, or 512. chara cters per 
logical record). If the logical records are equal 
to ar slightly less than these lengths then blocks 
need not be spanned and little disk space need be 
wastea, Spanned recerds cause the proaran to be 
larger than otherwise and probably to execute more 
slowly. 
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